perl -e "s/(.*)\n/\n$1/ && print scalar reverse while  <STDIN>"