Select Code to Download

#!/usr/bin/perl –w
print "Please enter your name\n";
chomp($name = <STDIN>);
print "Thank you $name";

Please enter your name
aaaThank you aaa[root Shared]#

 
Please enter your name
aaa
Thank you aaa[root Shared]#