Perl Debugger class