chop

`chop(LIST)'

`chop(VARIABLE)'

`chop VARIABLE'

`chop'

文字列の最後の文字を落としてその文字列を返す。 主に入力文字列から最後の改行文字を除くのに使うが、 文字列の走査やコピーを行わないので、s/\n// よりも効率がよい。 変数を省略した場合、$_ を使う。

while (<>) {
     chop;     # 最後の \n を取る
     @array = split(/:/);
     ...

左辺値であれば引数は何でもいい。

chop($cwd = `pwd`);
chop($answer = <STDIN>);

リストを chop した場合は、全要素を chop し、 最後に chop した文字を返す。