#!perl -p
$_=reverse;y;<>;><