]> ruderich.org/simon Gitweb - config/dotfiles.git/blobdiff - bin/temperature.pl
bin/*.pl: Add missing die to close.
[config/dotfiles.git] / bin / temperature.pl
index 9ee40cd64c2cd182b3238ec047cfba2ab59195ce..0063bf4ffb510aebf23faa243c6313c69b834ff0 100755 (executable)
@@ -37,10 +37,10 @@ my $critical;
 my $file;
 open $file, '<', $temperature_path or die $!;
 $temperature = <$file>;
-close $file;
+close $file or die $!;
 open $file, '<', $critical_path or die $!;
 $critical = <$file>;
-close $file;
+close $file or die $!;
 
 my $value = int($temperature / 1000);
 my $risk  = ($critical - $temperature)/$critical;