新人求教：关于文件句柄和管道

lqianc

1. open(FOO, "| wc -w ");
   
2. open(DB, "emp.names");
   
3. while(<DB>){ print FOO "$_"; }
   
4. close FOO;
   
5. 
   
6. file emp.names：
   
7. Steve Blenheim
   
8. Betty Boop
   
9. Igor Chevsky
   
10. Norma Cord
    
11. Jon DeLoach
    
12. Karen Evich
    
13. 
    

复制代码

书上看到的一个很简单的例子，我以为每读入一行文件内容就会输出一次wc -w的结果，也就是会输出6个2，结果却输出了总和12，求运行原理，先谢谢各位！

Kitaisky

wc (word count)是整个汇总的，不是按行输出的

结果一样: cat emp.names |wc -w

lqianc

回复 2# Kitaisky


    但是文件句柄一次只处理一行，我以为是像下面这样运行的，就是搞不明白为什么逐行处理，最后却得出总的结果，望再指教，谢谢

1. cat emp.names |while read line
   
2. do
   
3. echo $line|wc -w
   
4. done
   

复制代码

yinyuemi

回复 3# lqianc

1. 你的代码应该类似于这样：
   
2.     cat file|while read line
   
3.     do
   
4.     echo $line
   
5.     done |wc -w
   
6.      

复制代码

lqianc

回复 4# yinyuemi


    为什么不是每读取一行就传递到wc -w呢

yinyuemi

回复 5# lqianc


    Try:

1. echo 'Steve Blenheim
   
2. Betty Boop
   
3. Igor Chevsky
   
4. Norma Cord
   
5. Jon DeLoach
   
6. Karen Evich' |perl -e 'while(<>){open (FOO,"|wc -c"); print FOO;close(FOO)};'
   

复制代码

kk861123

回复  lqianc


    Try:
yinyuemi 发表于 2011-11-14 03:27

    每行都要打开和关闭句柄，有其他方法只打开一次吗？不懂~请教高手！

Mr-Summer

是不是wc -w 以文件结尾标示为结尾标示，\n就无视了  

cai120120-pb

1. open(DB, "emp.names");
   
2. while(<DB>){
   
3.         split /\W+/;
   
4.         print $#_+1 ."\n";
   
5.              }
   
6. close(DB);

复制代码