元ネタ
Rubyって書いてあったのでPerlでやってみました（何
open(F, "<hoge.txt") or die "oops\n"; @line = <F>; @line = reverse(@line); print join("", @line); close(F);
これぐらいならがんばればワンライナーできそうな気も。