perl 里的<>和

<>操作查看@ARGV来决定使用哪些文件。如果表为空,则使用标准输入流;否则,使用其找到的相应文件。也就是,在启动程序后,使用<>之前,你还有机会修改@ARGV的值。例如,下面程序可以处理3 个指定的文件,无论用户在命令行中输入了什么其它的文件:
@ARGV = qw# larry mor curly #; #强制使用这三个文件
while(<>){
chomp;
print “It was $_ that I saw in some stooge-like file!\n”;
}


#! /usr/bin/perl -w

while(<STDIN>) {
   print;
}

=======================
#! /usr/bin/perl -w

while(<>) {
   print;
}
角符 <> 和 <STDIN> 最大的不同是 <STDIN> 是由標準輸入取得資料,但:角符 <> 可以由指定的檔案取得資料,而該檔案檔名可以放在命令列中加以指定。如下例:

#! /usr/bin/perl

while (<>) {
         print;
}

# 上式存成 readfile.pl,執行法:

./readfile.pl index.html

即可將 index.html 這個檔案讀進來,並且顯示每一列的內容。

若 ./readfile 沒有任何檔案,則改由標準輸入來取得資料,此時,就和 <STDIN> 作用相同了。


==========================================================================

#! /usr/bin/perl -w
print <>; ### 相当于cat
print sort <>; ###相当于sort;

你可能感兴趣的:(perl)