あおいろ日記＠わんくま同盟

2008年7月

日

月

火

水

木

金

土

[Perl][お題]テキスト行の逆順表示その後

　ワンライナー版

perl -e "print join('', reverse(<>));" hoge.txt

　Rubyって書いてあったのでPerlでやってみました（何

open(F, "<hoge.txt") or die "oops\n";
@line = <F>;
@line = reverse(@line);
print join("", @line);
close(F);

これぐらいならがんばればワンライナーできそうな気も。