【請(qǐng)教】perl在打開一個(gè)文件句柄之后，是不是就無法寫其他文件了？

maxpayne

寫了一個(gè)小腳本，無法運(yùn)行，如下：

1. 
   
2. while(<>){
   
3. system(echo $_ > >tmp);
   
4. }
   

復(fù)制代碼

只能把最后一行寫進(jìn)tmp文件，想問一下，是因?yàn)閣hile在打開文件句柄之后，就無法向其他文件寫東西了么？？

justlooks

再打開一個(gè)句柄啊

yybmsrs

為什么只能把最后一行寫進(jìn)tmp文件呢？

longbow0

多了一個(gè)空格？

1. 
   
2. >>
   

復(fù)制代碼

不是

1. 
   
2. > >
   

復(fù)制代碼

yybmsrs

回復(fù) 4# longbow0


    是>>，但是只能寫最后一行

Perl_Er

回復(fù) 5# yybmsrs


    >> 表示  append

yybmsrs

回復(fù) 6# Perl_Er


    lz這個(gè)很奇怪，我試了下，只能寫進(jìn)去最后一行，其他行都不行。在讀完第一行后exit，里面還是空的�；蛘甙�$_賦給一個(gè)變量，還是只能寫進(jìn)去最后一行。如果循環(huán)外定義一個(gè)$i，然后++，寫$i倒是可以。

   這個(gè)是什么原因呢？

xti9er

你那兩個(gè) > 之間有個(gè)空格
而這么寫代碼 貌似有點(diǎn) 糾結(jié)

climby

我嘗試了一下，這個(gè)現(xiàn)象似乎是換行符惹的禍。我試了如下方式，好像一切正常

1. 
   
2. while (<>) {
   
3.      chomp;
   
4.    
   
5.     system("echo $_ >> tmp");
   
6.    
   
7.    
   
8. }
   

復(fù)制代碼

yybmsrs

回復(fù) 9# climby


    是不是sh的關(guān)系？