print "Name is: $name that's all.\n";