Help for this page

Select Code to Download


  1. or download this
    ...
DEBUG and print 'debugging';
...
  2. or download this
    C:\test>perl -le"use constant DEBUG=>0; print 'hi'; DEBUG and print 'd
+ebugging'; print 'bye'"
hi
...
'???';
print 'bye';
-e syntax OK
  3. or download this
    #! perl -slw
use constant DEBUG => $DEBUG;
...
print 'debugging';
print 'bye';