Perl中的chomp函數用于刪除字符串末尾的換行符(\n)、回車符(\r)或換行回車符組合(\r\n)。
chomp函數的使用格式為:
chomp($string);
其中,$string是要進行處理的字符串。chomp函數會修改傳入的字符串,刪除末尾的換行符等特殊字符。
示例:
my $str = "Hello World\n";
chomp($str);
print $str; # 輸出:Hello World
在上述示例中,原始字符串"Hello World\n"經過chomp函數處理后,末尾的換行符被刪除,最后輸出的結果為"Hello World"。
chomp函數也可以應用于數組,可以一次性刪除數組中所有字符串元素末尾的換行符等特殊字符。
示例:
my @array = ("apple\n", "banana\r\n", "cherry\r");
chomp(@array);
foreach my $element (@array) {
print $element;
}
# 輸出:apple,banana,cherry
在上述示例中,數組@array中的所有元素經過chomp函數處理后,字符串末尾的換行符等特殊字符被刪除,最后輸出結果為"apple"、“banana"和"cherry”。