Релиб / Веб-программирование / Perl / HELP!!!! Проблеммы с Term::Menus / Latest Posts

RE: HELP!!!! Проблеммы с Term::Menus

PoizOn — Wed, 15 Jun 2005 11:58:00 GMT

Чудес тут быть не может - ошибка возникает потому что модуль не подключен правильно (и скрипт думает что функция pick принадлежит скрипту (пакету main::)а не модулю).Вот код который работает (взят из perldoc). #!/usr/bin/perluse Term::Menus; my @list=('First Item','Second Item','Third Item'); my $banner=" Please pick an item:"; my $selection=&pick(\@list,$banner); print "SELECTION = $selection
";

RE: HELP!!!! Проблеммы с Term::Menus

dnsokol — Wed, 15 Jun 2005 11:52:00 GMT

то же самое:Undefined subroutine &main::pick called at E:\AdvScripts\tstmnu.pl line 6. :(уже всю голову поломал....

RE: HELP!!!! Проблеммы с Term::Menus

PoizOn — Tue, 14 Jun 2005 11:52:00 GMT

Потому что у вас ошибка в подключении модуля, регистр букв имеет значение.Надо так:use Term::Menus;и дальше ваш код (без require).

HELP!!!! Проблеммы с Term::Menus

dnsokol — Fri, 10 Jun 2005 18:14:00 GMT

Хотел для создания менюхи использовать Term::Menus, однако натолкнулся на непонятные мне грабли. Даже если использовать текст примера из дока:[code] #!c:\perl\bin\perl.exe -wrequire Term::menus;my @list=('First Item','Second Item','Third Item');my $banner=" Please pick an item:";my $selection=&pick(\@list,$banner);print "SELECTION = $selection
";[/code]скрипт вылетает с ошибкой:Undefined subroutine &main::pick called at E:\test\tstmnu.pl line 7.Пишется всё на Activstate perl.