1: 2: 3: 4: 5:
print " What is your name?\n"; $name = <STDIN>; print "What is father's name\n"; $pname=<>; print"Hellow $pname\n";