[問題] 新手提問

[psylove5566 (醜妞)]

想請教各位大大
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
推 dryman:我推薦你去買「Perl學習手冊」，這本很簡單，也能解決你
→ dryman:的問題
推 abliou:看不下去了 這標題真的很爛 一點鑑別度也沒有
→ flu:我猜發問的目的只是要處理一些應急的事件吧
→ flu:po出去的文沒有頭也不會有尾
→ psylove5566:抱歉,下次po文會改進的,謝謝
→ flu:http://is.gd/2ccqw2 perl概論, 4x頁的pdf 也可以看看
→ psylove5566:感激,感激
→ psylove5566:以前重沒碰過perl,突然研究需要,所以才急著了解