Help for this page
my $f = $mw->Frame->pack(-side => 'top', -fill => 'x'); my $t = $mw->Scrolled("Text",-font=>"{arial} 12 {bold}")->pack(-side = +> 'bottom', -fill => 'both', -expand => 1);
$f->Button(-text => "Display", -command =>\&tged)->pack(-side => 'righ +t'); ... #print @chars; } 1;
my $t = $mw->Scrolled("Text",-font=>"{arial} 12 {bold}")->pack(-side = +> 'bottom', -fill => 'both', -expand => 1); ... . } 1;
www.com | www.net | www.org
No recent polls found