Re^2: shift and logical or

[Kenosis]

in reply to Re: shift and logical or
in thread shift and logical or

Defined, undefined or false?

use strict;
use warnings;

my $val = 0;

print +($val) ? "defined" : "undefined"; # prints undefined

print "\n";

print +(defined $val) ? "defined" : "undefined"; # prints defined

undef $val;

print "\n";

print +(defined $val) ? "defined" : "undefined"; # prints undefined