當前位置: 首頁>>編程示例 >>用法及示例精選 >>正文


Perl chomp()用法及代碼示例

Perl中的chomp()函數用於從輸入字符串中刪除最後一個尾隨的換行符。

用法: chomp(String)

參數:
String :輸入字符串,其尾隨的換行符將被刪除


返回值:從其所有參數中刪除的尾隨換行符的總數

示例1:

#!/usr/bin/perl 
  
# Initialising a string 
$string = "GfG is a computer science portal\n"; 
  
# Calling the chomp() function 
$A  = chomp($string); 
  
# Printing the chopped string and  
# removed trailing newline character 
print "Chopped String is : $string\n"; 
print "Number of Characters removed : $A";
輸出:
Chopped String is : GfG is a computer science portal
Number of Characters removed : 1

在上麵的代碼中,可以看到包含換行符(\ n)的輸入字符串已由chomp()函數刪除。

示例2:

#!/usr/bin/perl 
  
# Initialising two strings 
$string1 = "Geeks for Geeks\n\n"; 
$string2 = "Welcomes you all\n"; 
  
# Calling the chomp() function 
$A  = chomp($string1, $string2); 
  
# Printing the chopped string and  
# removed trailing newline character 
print "Chopped String is : $string1$string2\n"; 
print "Number of Characters removed : $A\n";
輸出:
Chopped String is : Geeks for Geeks
Welcomes you all
Number of Characters removed : 2

在上麵的代碼中,可以看到,包含兩個換行符(\ n \ n)的輸入string1通過chomp()函數僅刪除了最後一個換行符,並使用了輸出中可以看到的倒數第二個換行符。



相關用法


注:本文由純淨天空篩選整理自Kanchan_Ray大神的英文原創作品 Perl | chomp() Function。非經特殊聲明,原始代碼版權歸原作者所有,本譯文未經允許或授權,請勿轉載或複製。