Perl学习之五：输入与输出

一、标准输入

• 行输入操作符<STDIN>

    例1：

    $line = <STDIN>;            # 读入下一行

    chomp($line);                  # 去掉末尾换行符

 

    chomp($line = <STDIN>); # 效果同上

 

    例2：

     # 读到文件末尾，行操作符会返回undef，致使defined($line = <STDIN>，循环结束

    while (defined($line = <STDIN>)) {

        print "I saw $line";

    }  

    例3：

 

     # 上例的简写

    while (<STDIN>) {

        print "I saw $_";

    }