... map { tr/a-zA-Z/A-Za-z/; $_ } ...

##</code><code>##

... map { (my $x = $_) =~ tr/a-zA-Z/A-Za-z/; $x } ...