[root@master perl]# cat 4.pl
$data = "this>";
#local $/ = ">";
chomp($data);
print "\$data is $data\n";
[root@master perl]# perl 4.pl
$data is this>
[root@master perl]# cat 4.pl
$data = "this>";
local $/ = ">";
chomp($data);
print "\$data is $data\n";
[root@master perl]# perl 4.pl
$data is this
默认值为“\n". perl中”行“的概念就由$/决定。
perl 中的$/
最新推荐文章于 2017-11-07 11:19:25 发布