$foo = 1;
if ($foo) { print "Yes, it's true.\n"; }
if (not $foo) { print "No, it's false.\n"; }

$foo = undef;
if ($foo) { print "Yes, it's true.\n"; }
if (not $foo) { print "No, it's false.\n"; }