print (defined $a) ? "Defined\n" : "Undefined\n"; #### (print defined $a) ? "Defined\n" : "Undefined\n"; #### print ((defined $a) ? "Defined\n" : "Undefined\n");