Select Code to Download

package DEBUGGER;

...

  __PACKAGE__->export_to_level(1);
}

use strict;
use DEBUGGER (
...
# and debug_level is set to 2
break_if $x < 5, 2;
print "exiting...\n";