Perl 程式設計/關鍵字/chop

Thechopkeyword

Thechop函式截斷字串的最後一個字元並將其返回。它比s/.$//s更高效，因為它不掃描也不復制字串。沒有VARIABLE，它截斷$_。如果VARIABLE是雜湊，它會截斷雜湊的值，而不是其鍵，並在過程中重置每個迭代器。

如果列表被截斷，每個元素都被截斷，但只返回最後一個截斷的值。請注意，chop 返回最後一個字元。要返回除最後一個字元以外的所有字元，substr($string, 0, -1)應該被使用。

語法

  chop VARIABLE
  chop(LIST)
  chop

示例

程式碼

use 5.10.0;

%favorite = (joe => 'red', sam => 'blue', walter => 'black');

%list = %favorite;

say "%favorite = ";
foreach my $element (%favorite) {
  say $element;
}

say "Now, chopping...";
say chop(%favorite);

say "%favorite = ";
foreach my $element (%favorite) {
  say $element;
}

返回以下內容

%favorite =
walter
black
joe
red
sam
blue
Now, chopping...
e
%favorite =
walter
blac
joe
re
sam
blu