Re: Perl Debugger with Two Customs Tk Widgets

I don't know that it will be of any use to you, but as I recall, guiguts used to crash the perl debugger before I added the line number mega widget (2002-2003??), so I doubt that that is the (or at least the only) issue. I never figured out why it would crash back then (and truthfully, didn't really care as I didn't heavily use the perl debugger.)

Comment on Re: Perl Debugger with Two Customs Tk Widgets

Replies are listed 'Best First'.
Re^2: Perl Debugger with Two Customs Tk Widgets by hmonroe (Novice) on Jan 31, 2012 at 22:29 UTC
Thundergnat: the problem with with the Text widget--regex searches crash the debugger. `#!/usr/bin/env perl use Tk; $topWin = MainWindow->new(); my $text = $topWin->Text(); $text->insert("end", "Type text into this window"); print $text->search("-exact", 'e', '1.0', 'end')."\n"; print $text->search("-regexp", 'e', '1.0', 'end')."\n"; $text->pack(); MainLoop();` [download]	[reply] [d/l]

Replies are listed 'Best First'.

Re^2: Perl Debugger with Two Customs Tk Widgets
by hmonroe (Novice) on Jan 31, 2012 at 22:29 UTC

#!/usr/bin/env perl
use Tk;
$topWin = MainWindow->new();
my $text = $topWin->Text();
$text->insert("end", "Type text into this window");
print $text->search("-exact", 'e', '1.0', 'end')."\n";
print $text->search("-regexp", 'e', '1.0', 'end')."\n";
$text->pack();
MainLoop();
[download]

[reply]
[d/l]