Perl 函数


描述

此函数删除 EXPR 中的最后一个字符、LIST 的每个元素或 $_(如果未指定值)。

句法

以下是该函数的简单语法 -

chop VARIABLE

chop( LIST )

chop

返回值

此函数返回从 EXPR 中删除的字符,并且在列表上下文中,该字符从 LIST 的最后一个元素中删除。

例子

以下是显示其基本用法的示例代码 -

#!/usr/bin/perl

$string1 = "This is test";
$retval  = chop( $string1 );

print " Choped String is : $string1\n";
print " Character removed : $retval\n";

执行上述代码时,会产生以下结果 -

Choped String is : This is tes
Number of characters removed : t
perl_function_references.htm