use List::Util qw(first); my @hashes = grep { first { $_ eq '1117'} @{$_->{bill}} } @array; [download]
In reply to Re: perl array of hashes help by trizen in thread perl array of hashes help by ragilla