一、改变文件输出。
select REDROCK;#REDROCK是一个文件句柄
print "输出到REDROCK所指的文件中";
select STDOUT;
print "输出到标准STDOUT中";
二、使用say会在每行输出的结尾加上换行符,等同于print。
use 5.010;#使用perl5.10
select REDROCK;#REDROCK是一个文件句柄
print "hello!\n";
say "hello!";
say REDROCK "hello!";