/[cricket]/parse_wifi.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /parse_wifi.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by dpavlin, Sat May 17 22:35:52 2003 UTC revision 1.2 by dpavlin, Sun May 18 02:08:41 2003 UTC
# Line 73  alarm 0;       # turn alarm off Line 73  alarm 0;       # turn alarm off
73  $cache->set( $ssh, $wifi, "1 min" ) if ($USE_CACHE);  $cache->set( $ssh, $wifi, "1 min" ) if ($USE_CACHE);
74    
75  # dump  # dump
76  for(my $i=0; $i <= $#labels; $i++) {  for(my $i=0; $i <= ($#labels+1); $i++) {
77  #       print $labels[$i]," : ";  #       print $labels[$i]," [$i] : ";
78          print $wifi->{$dev}[$i] || 0;          my $val = $wifi->{$dev}[$i];
79            $val =~ s/\.$//g;               # kill trailing dot
80            print $val || 0;
81          print "\n";          print "\n";
82  }  }
 print "\n";  
83    

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

  ViewVC Help
Powered by ViewVC 1.1.26