pack;$ec->configure(-command => 'perl hello.pl');
i am trying to run simple script
use Tk;
use Tk::ExecuteCommand;
$ec = tkinit()->ExecuteCommand(
-command => '',
-entryWidth => 50,
-height => 10,
-label => '',
-text => 'Execute',
)->pack;
$ec->configure(-command => 'perl hello.pl');
$ec->execute_command;
$ec->update;
and saved in tk-hello.pl
# hello.pl is another script that i want to call via Tk.
while running perl tk-hello.pl, i am getting following error
bad option "pady": must be -after, -anchor, -before, -expand, -fill, -in, -ipadx
, -ipady, -padx, -pady, or -side at C:/Strawberry/perl/site/lib/Tk/Widget.pm lin
e 1218.
at C:/Strawberry/perl/site/lib/Tk/Widget.pm line 203.
please help me to solve this issue.
Sysop: | Keyop |
---|---|
Location: | Huddersfield, West Yorkshire, UK |
Users: | 353 |
Nodes: | 16 (2 / 14) |
Uptime: | 78:06:34 |
Calls: | 7,639 |
Files: | 12,802 |
Messages: | 5,691,830 |