map {s/\\://g;$_} #### map { (my $s = $_) =~ s/\\(.)/$1/sg; $s } #### map {s/\\://g;$_} #### map { my $s = $_; $s =~ s/\\(.)/$1/sg; $s =~ s/://g; $s }