http://qs321.pair.com?node_id=798383


in reply to Best way to parse my data

#!/usr/bin/perl -wlan next if /OFFLINE/; # I want to only report the ones that have ONLINE if ($F[0] eq 'B') { push @{ $groups{ $F[1] } }, $F[2]; } if ($F[0] eq 'G') { print "$F[1] is frozen on hosts " . join ', ', @{ $groups{ $F[1] } + }; }