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

投稿日 : 2008年7月9日 13:44

 元ネタ

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

 

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

 

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

フィードバック

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

2008/07/09 15:11 by あおいろ日記@わんくま同盟
[Perl][お題]テキスト行の逆順表示その後
コメントの入力
タイトル
 
名前
 
Url
コメント