say ($_=get)~($_~~/u/&&'ham')