chop 执行效果??

hunter_cao

怎么能看CHOP函数执行效果?????
--------------------------------------------------------------------------------------------------------------------
函数名 chop
调用语法 $lastchar = chop (var);
解说 var可为变量或数组，当var为变量时，最后一个字符被删除并赋给$lastchar，当var为数组/列表时，所有元素的最后一个字符被删除，最后一个元素的最后一个字母赋给$lastchar。
-------------------------------------------------------------------------------------------------------------------

apile

$abc ="1234";
print chop($abc)."\n";

hunter_cao

$abc =<STDIN>;
print chop($abc)."\n";
输入没有显示了???
thanks for the reply.

qinxianjun

原帖由 hunter_cao 于 2006-12-21 15:36 发表
$abc =<STDIN>;
print chop($abc)."\n";
输入没有显示了???
thanks for the reply.

在什么环境下?

among29

最后一个是 \n, 返回的是\n, 换行而已
chop和chomp就这个区别
chop返回的是最后一个字符。
chomp去除最后一个换行符，\n, 返回0或是1，删除成功则返回1

hunter_cao

謝謝,楼上的同胞!

hunter_cao

$str=<STDIN>;      #我输入了 my perl
chop($str);             #--->>>   有无这条语句print输出效果都一样.
if($str=~/perl$/){
  print " 是以perl字符结束\n";
}
----------------------------------------------------------------------------
我想请问chop什么用途有意义呢????谢谢.

among29

chop去除字符串的最后一个字符，并返回最后移除的字符
re中 $   Match the end of the line (or before newline at the end)

多看看perldoc