Help for this page
$win->Button(-text => 'OK', -command => [\&ok, $win])->pack;
sub ok { ... $win->destroy; $notified = 1; }
www.com | www.net | www.org
No recent polls found