一個Perl文本處理實例

假設存在file1, file2兩個文本文件， 文件每行格式爲： | .* | .*; 要求：求出全部在file2文件中出現的行， 且僅保留雙"|"之間的內容。 如： 若存在 |adfdf| dofijaosdjioaf 於file2, file1中不存在該項，則該返回 |adfdf| 參考例程: #!/usr/bin/perl use strict; use warnings; die "lac

>>阅读原文<<