Perl chop()和chomp()

本文概述

• Perl chop()
• Perl chop()示例
• Perl chomp()
• Perl chomp()示例

这两个功能非常相似。它们都从给定字符串的末尾删除一个字符。

Perl chop()

Perl chop()函数从字符串中删除最后一个字符, 而不管该字符是什么。它从字符串中返回切碎的字符。

句法：

chop();

Perl chop()示例

#chop() EXAMPLES  
$a = "AEIOU";  
chop($a);  
print "$a\n";  #it will return AEIO.  
$a = "AEIOU";  
$b = chop($a);  
print "$b\n";  #it will return U.

输出

AEIO
U

看一下输出, 首先, 斩波后输出变量$ a。然后输出变量$ b, 它从字符串中返回切碎的字符。

Perl chomp()

chomp()函数从字符串末尾删除任何换行符。它返回从字符串中删除的字符数。

句法：

chomp();

Perl chomp()示例

#chomp() EXAMPLES  
$a = "AEIOU";  
chomp($a);  
print "$a\n";  #it will return AEIOU. 
$a = "AEIOU";  
$b = chomp($a);  
 print "$b\n"; #it will return 0, number .
 $a = "AEIOU\n";  
chomp($a);  
print "$a\n";  #it will return AEIOU, removing new line character.  
$a = "AEIOU\n";  
$b = chomp($a);  
print "$b\n";  #it will return 1, number of characters removed.

输出

AEIOU
0
AEIOU
1

首先看一下输出, 变量$ a不包含任何新的孤立字符。然后将其传递给变量$ b并打印。由于没有删除任何字符, 它返回0。

现在, 变量$ a包含换行符。当它在$ b中传递时, 它返回1, 因为它删除了一个新行字符。