print join ' ', map{scalar(reverse split //) } qw/teY rehtona lreP .rekcah/;
__DATA__
#output
Yet another Perl hacker.