#!perl -pl $_=reverse