my $line = "hello\n";

my $x = chomp $line;

print $x; # prints "1"

##</code><code>##

my $line = "hello\n";

$line = chomp $line;

print $line; # prints "0"!