Chomp：该chomp()函数（通常）将从字符串末尾删除任何换行符。我们通常说的原因是它实际上删除了与$/（输入记录分隔符）的当前值匹配的任何字符，并$/默认为换行符。
有关更多信息，请参阅chomp。
正如rightfold所评论的，Perl 中没有修剪功能。一般来说，人们编写一个名为trim的函数（您也可以使用任何其他名称）来删除前导和尾随空格（或单引号或双引号或任何其他特殊字符）
修剪从字符串两端删除空格：
$str =~ s/^\s+|\s+$//g;