Perl port of trepanning debugger