summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
47b1f3c)
Signed-off-by: Stephen Gran <steve@lobefin.net>
my @line = split /\s+/, $line;
my $zone = $line[1];
my @line = split /\s+/, $line;
my $zone = $line[1];
$current_temp =~ s/(.*)C.*/$1/;
$threshold =~ s/(.*)C.*/$1/;
$current_temp =~ s/(.*)C.*/$1/;
$threshold =~ s/(.*)C.*/$1/;
+ next if ($threshold eq '-');
+ $num_temp++;
my $off = $threshold - $current_temp;
if ($off <= 0) {
my $off = $threshold - $current_temp;
if ($off <= 0) {