I write that as
s/foo/bar/ for my @new = @old; [download]
Makeshifts last the longest.
In reply to Re^3: Perl oddities (s/// doesn't DWIM in map) by Aristotle in thread Perl oddities by brian_d_foy