in reply to I find some strange on this code ? Sort the issue

Either you find something strange in the code or you don't.

Language issues aside... I suspect you might want something like this:

join ' ', map { scalar reverse($_) } qw/teY rehtona lreP .rekcah/;

Sorta complicated, though. Surely there's a better way?