use strict; use warnings; my $input = ; printf "input: [%s]\n", $input; my $return = chomp($input); printf "return: [%s] input: [%s]\n", $return, $input; $return = chop($input); printf "return: [%s] input: [%s]\n", $return, $input;