Help for this page

Select Code to Download

Select or download this

>perl -MO=Deparse -wle "print defined +() ? 1 : 0"
print defined(()) ? 1 : 0;
...
>perl -MO=Deparse -wle "$_ = 1; print defined () ? 1 : 0"
$_ = 1;
print defined $_ ? 1 : 0;

Select or download this

>perl -wle "print(()?'True':'False');"
False