Help for this page

Select Code to Download


  1. or download this
    print "defined\n" if (exists($x->{fred}->{dave}));
  2. or download this
    { print "defined\n" if (exists(%{$x->{fred}||last}->{dave})); }
  3. or download this
    print "defined\n" if (exists(%{$x->{fred}||{}}->{dave});