![]() |
![]() |
![]() |
![]() |
![]() |
![]() |
use Tk::Submethods ( 'command1' => [qw(sub1 sub2 sub3)], 'command2' => [qw(sub1 sub2 sub3)]);
->commandSub(...)
as an alias for ->command('sub',...)
e.g. ->grabRelease
for ->grab('release')
.
For each command/subcommand pair this creates a closure with command and subcommand as bound lexical variables and assigns a reference to this to a 'glob' in the callers package.
Someday the sub-commands may be created directly in the C code.
$CommentsMailTo = "perl5@dcs.ed.ac.uk"; include("../syssies_footer.inc");?>