perldoc -f chomp

##</code><code>##

print chomp (my $value = <STDIN>);