Help for this page
grep{ exists $ofInterest{ lc $_->{ Name } } } @proc_info ## : )
for my $info ( grep{ exists $ProcsOfInterest{ lc $_->{ Name } } } @proc_info ) { printf "%-25s %14d %12.6f %14.7f\n", @{ $info }{ @fields }; }