Help for this page

Select Code to Download

Select or download this

$ perl -MO=Deparse,-sv"'UNKNOWN'." 698666.pl
use constant ('DEBUG', 0);
...
'UNKNOWN';
print "Goodbye Cruel Word\n";
698666.pl syntax OK