读书人

perl 里的lt;gt;跟lt;STDINgt

发布时间: 2012-10-07 17:28:51 作者: rapoo

perl 里的<>和<STDIN>
<>操作查看@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 python

热点推荐