Help for this page
use strict; use warnings; ... #} print "$svc" . " is currently " . $statcodeHash{$statusHash{"CurrentSt +ate"}} . "\n";