@in = grep { $_->{$field} eq $value } @in;

##</code><code>##

@out = grep { $_->{$field} eq $value } @in;
@in = @out;