Perl chomp函数的用法是甚么

Perl中的chomp函数用于删除字符串末尾的换行符（n）、回车符（r）或换行回车符组合（rn）。
chomp函数的使用格式为：
chomp($string);
其中，$string是要进行处理的字符串。chomp函数会修改传入的字符串，删除末尾的换行符等特殊字符。
示例：

my $str = "Hello World
";
chomp($str);
print $str;   # 输出：Hello World

在上述示例中，原始字符串"Hello Worldn"经过chomp函数处理后，末尾的换行符被删除，最后输出的结果为"Hello World"。
chomp函数也能够利用于数组，可以一次性删除数组中所有字符串元素末尾的换行符等特殊字符。
示例：

my @array = ("apple
", "banana
", "cherry
");
chomp(@array);
foreach my $element (@array) {
print $element;
}
# 输出：apple，banana，cherry

在上述示例中，数组@array中的所有元素经过chomp函数处理后，字符串末尾的换行符等特殊字符被删除，最后输出结果为"apple"、"banana"和"cherry"。