<STDIN>

读取输入做为字符串

$test=<STDIN>;#从键盘上读取输入的行作为变量test的值,这种方式只读取一行
print $test;  #这种方式读取出来的内容，是以换行符为结束的

读取输入做为列表

chomp(@test=<STDIN>);#从键盘上读取输入内容做为列表test的值,这种方式把每一行做为数组的一个元组
foreach $t(@test){
print $t;#使用foreach语法打印
}