perl 中的$/

[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>";

>>阅读原文<<