Perlについての質問箱 5箱目
■ このスレッドは過去ログ倉庫に格納されています
0285デフォルトの名無しさん
NGNG行数にもよるが
open (F, "text.txt");
@afo = <F>;
$line_num = $#afo; #これでトータルの行数-1を$line_numに代入される
print @afo[$line_num]; #多分これがファイルの最終行
最後の行から読み出す方法ってreverseを使う以外になんかあったっけ?
■ このスレッドは過去ログ倉庫に格納されています