Perl5 リファレンス



chomp 変数
chomp リスト


       chomp   This safer version of the chop entry elsewhere in
               this document removes any trailing string that
               corresponds to the current value of `$/' (also
               known as $INPUT_RECORD_SEPARATOR in the `English'
               module).  It returns the total number of
               characters removed from all its arguments.  It's
               often used to remove the newline from the end of
               an input record when you're worried that the final
               record may be missing its newline.  When in
               paragraph mode (`$/ = ""'), it removes all
               trailing newlines from the string.  When in slurp
               mode (`$/ = undef') or fixed-length record mode
               (`$/' is a reference to an integer or the like,
               see the perlvar manpage) chomp() won't remove
               anything.  If VARIABLE is omitted, it chomps `$_'.

                   while (<>) {
                       chomp;  # avoid \n on last field
                       @array = split(/:/);
                       # ...

               You can actually chomp anything that's an lvalue,
               including an assignment:

                   chomp($cwd = `pwd`);
                   chomp($answer = );

               If you chomp a list, each element is chomped, and
               the total number of characters removed is