Guide in Perl

Sab, 19/02/2005 - 16:49

Script per monitorare CPU e Motherboard.

Inviato da Marcoski

A useful script to monitor cpu and motherboard, using sensors command.Script per monitorare CPU e Motherboard, usando il comando "sensors".

#!/usr/bin/perl -w
# Written by marcoski
############ SCRIPT THAT TAKE VALUE TO MRTG TO MONITORING SYSTEM TEMPERATURE
# parameters: [cp][mb]
 
my($arg, $command, $temperature);
$command=`sensors`;
$arg = $ARGV[0];
if(length($arg) != 0){
    if($command =~ /$arg: *\+([0-9]{2}|[0-9]{2}\.[0-9])\°.*/){
        $temperature = $1;
        if($temperature =~ /([0-9]{2})\.[0-9]/){
             $temperature = $1;
        }




Mer, 22/09/2004 - 02:49

Ripping cd supporto cdda (bash+perl)

Inviato da kripsio

Sono due file, un bash script ed un perl script... li scrissi supperggiu' un mese dopo che avevo preso in mano linux, sono molto grezzi ma li uso ancora con soddisfazione.
Se qualcuno vuole sistemarli ben venga ... forse un giorno lo faro' pure io :-P ...