my @list = (... stuff ...); my @other_list = map { s/SOMETHING//; $_ } @list;
(Incidentally, perlcritic will warn you if you have a map that modifies $_.)
my $old = "foo"; my $new = $old =~ s/foo/bar/r;