if($Beauty eq $Truth) {
print "That is all\nYe know on earth, and all ye need to know.\n"
}