print result

5 years ago · e8c51351c7
parent ca9cb61752
commit e8c51351c7
1 changed files with 2 additions and 2 deletions
--- a/Check.pm
+++ b/Check.pm
@ -129,8 +129,8 @@ sub action
 	    ($shortErr = $Status{$host}{error}) =~ s/(.{48}).*/$1.../;
 	    $shortErr = " ($shortErr)";
 	}
-  my $sizeConsistency = `/bin/perl check_size_consistency.pl --host=localhost`;
-
+  my $sizeConsistency = print(`/bin/perl check_size_consistency.pl --host=localhost`);
+  
        $str = <<EOF;
 <tr$reasonHilite><td class="border">${HostLink($host)}</td>
    <td align="center" class="border" style="color:Gray">$fullAge</td>