chomp( my $line = <STDIN> );
print "You typed '$line'.\n";