打开一个已打开的句柄是隐式地关闭第一个文件,使它对Perl文件句柄不可取，并打开一个不同的文件。你必须小心这是你真正想做的。有时，偶然碰巧，比如，当你open($handle,$file)时,$handle正好包含空串(null)。确认设置$handle为某个单一个量,否则你将对空句柄打开一个新的文件。
一旦你已为输入打开一个句柄(或你使用STDIN),你就能使用"行读操作"<>,读一行。这个也以钻石操作闻名，因为它的形状。这个钻石操作包含你想读的句柄()[4]。使用STDID句柄读用户提供的答案,如下:
空钻石操作<>,将从命令行指定的所有文件读,如果没有指定,从STDIN读。(这是许多UNIX"过滤"程序的标准行为)
printSTDOUT"Enteranumber:";#请求输入一个数
$number=<STDIO>;#输入一个数
printSTDOUT"Thenumberis$number";#输出这个数
你明白我们给你的例子吗?在print语句中STDOUT做什么?这就是你使用一个输出句柄的方法之一。一个句柄可以作为print语句的第一个参数,如果存在,告诉往哪儿输出。在例子中，句柄是冗余的，因为输出已经是STDOUT。对于输入的缺省是STDIN,对于输出的缺省是STDOUT。(在班级例子的18行,我们为避免使你混淆,我们省略了。)
我们也有一件事使你不明白。如果你试上面的例子，你可以注意到你得到一个特别的空行。因为读时没有自动地从你的输入行中删除换行符(newline)(例如,你输入"9")。对于这些情况，当你想删除换行符时，Perl提供chop和chomp函数。chop将不加区别地删除(并返回)传给它的最后一个字符,而chomp只删除记录标识的末尾(一般地是""),并返回这样删除的字符数。
