use Storable 'dclone';
my $AoH_new = dclone $AoH_old; ## copy the old structure

## change an item in each hash in the new copy
$_->{title} =~ s/ /_/g for @$AoH_new;