fixes a character shifted to the left in certain 'hplog' outputs. #78

This commit is contained in:
Jordi Sanfeliu 2015-02-23 10:51:52 +01:00
parent 72c2c41b44
commit 6b5fc76760
1 changed files with 3 additions and 0 deletions

View File

@ -163,6 +163,7 @@ sub hptemp_update {
if($data[$l] =~ m/^$str /) {
my $temp = trim(substr($data[$l], 47, 3));
chomp($temp);
$temp =~ s/C//;
push(@hptemp1, map {$_ eq "---" ? 0 : $_} ($temp));
}
}
@ -171,6 +172,7 @@ sub hptemp_update {
if($data[$l] =~ m/^$str /) {
my $temp = trim(substr($data[$l], 47, 3));
chomp($temp);
$temp =~ s/C//;
push(@hptemp2, map {$_ eq "---" ? 0 : $_} ($temp));
}
}
@ -179,6 +181,7 @@ sub hptemp_update {
if($data[$l] =~ m/^$str /) {
my $temp = trim(substr($data[$l], 47, 3));
chomp($temp);
$temp =~ s/C//;
push(@hptemp3, map {$_ eq "---" ? 0 : $_} ($temp));
}
}