Help for this page
grep /$_/, [ @{$tbl{$i}} ]
$perl perl ... print "@hash{a}", $/; Scalar value @hash{a} better written as $hash{a} at - line 7.