chopは、指定された文字列の最後の文字を取り除く。Perlの組み込み関数 chop の翻訳 - perldoc.jpchompは、末尾が改行なら取り除き、そうでないなら何もしないのに対して、 chopは、条件なく最後の文字を取り除く。これで、 $ vi chop.pl $ perl chop.pl ABC…