Help for this page

Select Code to Download


  1. or download this
    use Debug (1);
    
    print "This is the program\n";
    DEBUG { print "Debugging mode is ON\n"; };
    print "Program continues...\n";
    
  2. or download this
    use Debug (1);
    use Debug (0, DBG_SPECIAL);
    
    DEBUG { warn "First type\n"; };
    DBG_SPECIAL { warn "Second type\n"; }
    
  3. or download this
    # This goes in Debug.pm...
    package Debug;
    ...
    
    1;