perl - tac を一行で : 404 Blog Not Found2008年05月26日02:30 カテゴリ一日一行野郎Tips perl - tac を一行で それってone-linerで。 [を] さくらのレンタルサーバに tac コマンドを入れる UNIX 系のコマンドで、tac というのがすごく便利なのです。 これはファイルを先頭から表示する cat というコマンドの逆で、 ファイルを行単位でひっくり返して末尾から表示してくれるのです。% perl -e 'print reverse <>' ただし、このやり方は一端メモリーに全ファイルを読み込むので非効率といえば非効率。以下のようにすればもう少し効率的になりますか。 #!/usr/local/bin/perl use strict; use warnings; @ARGV or die "$0 [files...]"; for my $filename ( reverse @ARGV ) { o
