作者psylove5566 (丑妞)
看板Perl
标题[问题] 新手提问
时间Wed May 22 22:31:20 2013
想请教各位大大
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
1F：推 dryman:我推荐你去买「Perl学习手册」，这本很简单，也能解决你 05/22 22:43
2F：→ dryman:的问题 05/22 22:43
3F：推 abliou:看不下去了 这标题真的很烂 一点监别度也没有 05/22 23:21
4F：→ flu:我猜发问的目的只是要处理一些应急的事件吧 05/22 23:57
5F：→ flu:po出去的文没有头也不会有尾 05/22 23:57
6F：→ psylove5566:抱歉,下次po文会改进的,谢谢 05/23 00:00
8F：→ psylove5566:感激,感激 05/23 00:04
9F：→ psylove5566:以前重没碰过perl,突然研究需要,所以才急着了解 05/23 00:06