#!c:\perl\bin print "What is your name? "; $Name = <STDIN>; chomp $Name; print "Hello $Name.";