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