perl -e ';
eval{alir tsuj}; 1 while($b[$j++]=chop($@)); print @b;'

##</code><code>##

.2 enil e- ta )?"just" daol ot togrof uoy spahrep( "just" egakcap aiv "rila" dohtem tcejbo etacol t'naC