文字列を逆順に

配列を逆順にする reverse は、引数がスカラーコンテキストの場合は
バイト単位で逆順にして返す。

$str = "abcdefg";
$str = reverse $str;

print "$str\n";           # <- gfedcba

$num = 12345;
$num = reverse $num;

print "$num\n";           # <- 54321


------
これも同じ。
$str = "abcdefg";
$str = join "", reverse split //, $str;
print "$str\n";