print "valid\n" if defined &$sub;