# this would work if it were Objective-C # using Perl's syntax my $foo = undef; my $result = $foo->message; print "undefined\n" if not defined $result;