Help for this page

Select Code to Download


  1. or download this
    >perl -MO=Deparse -e "$DEBUG = 0; print(qq{debug\n}) if $DEBUG; print(
    +qq{end\n})"
    $DEBUG = 0;
    ...
    '???';
    print "end\n";
    -e syntax OK