[問題] 新手提問
想請教各位大大
perl -e 'foreach $p (@ARGV) { $is_bad{$p} = 1; }; while(<STDIN>) { foreach $a(split(" ",$_)) { if(!$is_bad{$a}) { print "$a "; } } print "\n"; } ' `cat bad_phones.txt` < trees2.txt > trees3.txt
只看得懂指令在做檔案bad_phones.txt和檔案trees2.txt的比較,
但其中指令:
foreach $p (@ARGV) { $is_bad{$p} = 1; }; while(<STDIN>) { foreach $a(split(" ",$_))
看不太懂對檔案做了什麼處理
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.113.144.78
推
05/22 22:43, , 1F
05/22 22:43, 1F
→
05/22 22:43, , 2F
05/22 22:43, 2F
推
05/22 23:21, , 3F
05/22 23:21, 3F
→
05/22 23:57, , 4F
05/22 23:57, 4F
→
05/22 23:57, , 5F
05/22 23:57, 5F
→
05/23 00:00, , 6F
05/23 00:00, 6F
→
05/23 00:01, , 7F
05/23 00:01, 7F
→
05/23 00:04, , 8F
05/23 00:04, 8F
→
05/23 00:06, , 9F
05/23 00:06, 9F
討論串 (同標題文章)
Perl 近期熱門文章
PTT數位生活區 即時熱門文章
