This safer version ofchop removes any trailing string that corresponds to the current value of$/ (also known as$INPUT_RECORD_SEPARATOR in theEnglish 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; seeperlvar),chomp won't remove anything. If VARIABLE is omitted, it chomps$_. Example:
while (<>) { chomp; # avoid \n on last field my @array = split(/:/); # ...}If VARIABLE is a hash, it chomps the hash's values, but not its keys, resetting theeach iterator in the process.
You can actually chomp anything that's an lvalue, including an assignment:
chomp(my $cwd = `pwd`);chomp(my $answer = <STDIN>);If you chomp a list, each element is chomped, and the total number of characters removed is returned.
Note that parentheses are necessary when you're chomping anything that is not a simple variable. This is becausechomp $cwd = `pwd`; is interpreted as(chomp $cwd) = `pwd`;, rather than aschomp( $cwd = `pwd` ) which you might expect. Similarly,chomp $a, $b is interpreted aschomp($a), $b rather than aschomp($a, $b).
Perldoc Browser is maintained by Dan Book (DBOOK). Please contact him via theGitHub issue tracker oremail regarding any issues with the site itself, search, or rendering of documentation.
The Perl documentation is maintained by the Perl 5 Porters in the development of Perl. Please contact them via thePerl issue tracker, themailing list, orIRC to report any issues with the contents or format of the documentation.