Select Code to Download

use strict;
use warnings;
...
    print '$foo == $foo: $foo is numerically ', ($foo == $foo ? 'equal
+' : 'unequal'), "\n";
    Dump($foo);
}

$foo is undef
SV = NULL(0x0) at 0x1275f40
...
  NV = 0
  PV = 0