Re: [問題] 請問要怎樣取出最後一行
先提供一個用 Unix 命令列工具的方法
請慎重使用，sed 那行真的會移除最後一行
$ tail -n 1 old-file > new-file
$ sed -i '$ d' old-file
然後把這兩行自行重新組合成 shell script 即可
如果要用 Perl，可以用 Tie::File 模組
同樣需小心使用，真的會移除最後一行
use Tie::File;
my $file = 'old-file';
tie @lines, Tie::File, $file or die "Can't update $file: $!\n";
print $lines[-1], "\n"; # Or redirect to another file
delete $lines[-1];
摘自 Perl Cookbook，可見
http://docstore.mik.ua/orelly/perl4/cook/ch08_11.htm
※ 引述《jasonlee1001 (Jason)》之銘言：
: 請問要怎樣直接取出一個檔案的最後一行
: 然後把這一行印到另一個檔案
: 並且把原先的檔案的最後一行刪除後更新呢?
: 謝謝.
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 203.71.94.1
※ 文章網址: https://www.ptt.cc/bbs/Perl/M.1448869361.A.AF0.html
討論串 (同標題文章)
本文引述了以下文章的的內容：
完整討論串 (本文為第 2 之 2 篇)：
Perl 近期熱門文章
PTT數位生活區 即時熱門文章