print "Hello my name is ".(defined $name ? $name : "Anonymous Monk")."\n";