perl/tk wrapper to gdb