#!/usr/bin/perl
use 5.018;
use warnings;
chomp(my $text=
say "say is $text";
print "print is $text";
输出结果:
$ perl test.pl
fdsfdf\n
say is fdsfdf\n
print is fdsfdf\n$
say和print一样的。
意思是说chomp怎么没有把我输入的\n给去掉。
应该是输入fdsfdf而已。而没有\n。
chomp($str);#删除$str末尾的换行符
chomp;#删除确省变量$_末尾的换行符