in reply to Array slice vs foreach and push
hope this would help.
my @up_chars = map { tr/a-z/A-Z/; $_ } @chars; can be reduced to: my @up_chars = map uc, @chars;