my @newAoH = grep { !($_->{'name'} eq "fred") } @$AoHref;
my $newAoHref = \@newAoH;
...