【Perl读书笔记】读取标准输入

读 《C程序员精通Perl》http://book.douban.com/subject/1232075/   2.3节 笔记

#!/usr/bin/perl
use strict;
use warnings;

print "please input your name: ";

my $name = <STDIN>;

chomp($name);

print "name = $name\n";

运行结果：

[root@localhost perl_practice]# ./name.pl
please input your name: calf_man
name = calf_man
[root@localhost perl_practice]#

chomp($name); --- 去掉字符串的回车换行。因为从标准输入中读取数据时，会把换行符也读入。每次从标准输入读取数据后紧跟chomp函数是好习惯