URL: https://linuxfr.org/forums/astucesdivers/posts/perl-petit-script-pour-surveiller-votre-temp%C3%A9rature-de-process
Title: [Perl] Petit script pour surveiller votre température de processeur
Authors: Anonyme
Date: 2004年06月08日T18:02:07+02:00
Tags: 
Score: 0
Pour surveiller la température de votre processeur dans une console sans avoir un retour à la ligne :
assurer-vous d'avoir le module thermal de l'acpi chargé (si vous tournez avec le 2.6.6 méfiez-vous, des problèmes avec l'acpi sont signalés ici et là), et ce petit script vous affichera la température, avec une mise à jour toute les secondes, et la variation de température d'une seconde à l'autre.
J'ai écrit ce code ce matin en 15min, donc il n'est probablement pas idéal (pas taper si c'est pas bien). 
 
 _
 #!/usr/bin/perl -w<
 
 $prec = 0;
 while (1) {
 £spaces£ £/spaces£open (TEMP, "cat /proc/acpi/thermal_zone/THRM/temperature|");
 
 £spaces£ £/spaces£($temp) = (() =~ /temperature: (.*) C/);
 
 £spaces£ £/spaces£print $temp, " °C var = ", ($temp - $prec), " 015円";
 £spaces£ £/spaces£$prec = $temp;
 £spaces£ £/spaces£close TEMP;
 £spaces£ £/spaces£sleep 1;
 }
 _
</div><div class="naked_ctrl">
<form action="/index.cgi/contrast" method="get" name="gate">
<p><a href="http://altstyle.alfasado.net">AltStyle</a> によって変換されたページ <a href="httpS://linuxfr.org/forums/astucesdivers/posts/perl-petit-script-pour-surveiller-votre-temp%C3%A9rature-de-process.md">(-&gt;オリジナル)</a>
/ <label>アドレス: <input type="text" name="naked_post_url" value="httpS://linuxfr.org/forums/astucesdivers/posts/perl-petit-script-pour-surveiller-votre-temp%C3%A9rature-de-process.md" size="22" /></label> <label>モード: <select name="naked_post_mode">
<option value="default">デフォルト</option>
<option value="speech">音声ブラウザ</option>
<option value="ruby">ルビ付き</option>
<option value="contrast" selected="selected">配色反転</option>
<option value="larger-text">文字拡大</option>
<option value="mobile">モバイル</option>
</select>
<input type="submit" value="表示" />
</p>
</form>
</div>