| Subject: | critical bug |
| Date: | Sun, 24 Mar 2013 06:07:02 +0100 (CET) |
| To: | bug-Term-Menus [...] rt.cpan.org |
| From: | "Jürgen Brunk" <2jb [...] gmx.de> |
Hi Brian
First I want to thank you for your work on this great module Term::Menus.
It think I've run in the same error like discripted in reported bug #72041 and, sorry for that, still can't find a solution.
Problem: Got a "FATAL ERROR" when try to run a subroutine from a Result statement.
Code:
%Menu_4 = (
Label => 'Menu_4',
Item_1 => {
Text => ']Previous[: ]Convey[',
Convey => [ &get_all_emerg_tasks() ],
Result => "&do_deployment( ]Previous[{Menu_1}, ]P[, ]Selected[ )",
},
Banner => ' Please select a emergency task:'
);
sub do_deployment {
print "We will deploy $_[0], $_[1] to $_[2]\n"
}
Error Message:
Hexadecimal number > 0xffffffff non-portable at (eval 122) line 1.
Bareword found where operator expected at (eval 122) line 1, near "0x7fc5ca97bb::do_deployment"
(Missing operator before ::do_deployment?)
Bareword found where operator expected at (eval 122) line 1, near "]Previous"
(Missing operator before Previous?)
Bareword found where operator expected at (eval 122) line 1, near "]P"
(Missing operator before P?)
Bareword found where operator expected at (eval 122) line 1, near "]Selected"
(Missing operator before Selected?)
FATAL ERROR! - The Local System harley.fritz.box Conveyed
the Following Unrecoverable Error Condition :
Undefined subroutine &Net::FullAuto::FA_Core::handle_error called at /....../perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/Term/Menus.pm line 4903.
line 4922 at /......../perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/Term/Menus.pm line 4935.
Environment:
Term::Menu Version 2.25
perl-5.10.1 on OSX (10.8.2)
Many thanks in advance for you effort and patient.
Jürgen B.