chomp($x=<STDIN>)

##</code><code>##

$y=reverse($x)