Your message for today is: @i=map(chr,split(/5/,(join' ',(qq(10659751125104)))));for(@i){chomp;push(@o,[split(//,join('',$_))]);}@a=qw$ tsu rehton lre rekca$;$a=-1;for(@a){$a++;@_=reverse(split(//));push(@{$o[$a]},@_);}for(@o){print join('',@{$_})," ";}
-30-