my @AoH_new = map {       ## store the result in an array
    my %h = %$_;          ## make a copy of each hashref
    $h{title} =~ s/ /_/g; ## modify a value in the hash copy
    \%h;                  ## return a ref to that copy
} @$AoH_orig;