есть хэш, что-то вроде: my %switcher_0 = ( '00FB' => \&node_1, '0341' => \&node_124, '0143' => \&node_12846, "\n" => sub { return }, ); есть код: sub node_0 { $parameter[ 5 ] = fetch_parameter( 'ID' ); my $fref = $switcher_0{ $parameter[5] }(); if (defined($fref)) { &$fref(); } else { &$switcher_0{ "\n" }(); } } ругается так: Global symbol "$switcher_0" requires explicit package name at ruler.pm line 15665. syntax error at ruler.pm line 15665, near "$switcher_0{ " syntax error at ruler.pm line 15667, near "}" 15665 это строка &$switcher_0{ "\n" }(); что не так?
Ответ на:
комментарий
от asgard
Ответ на:
комментарий
от dilmah
Ответ на:
комментарий
от dilmah
Ответ на:
комментарий
от dilmah
Ответ на:
комментарий
от dilmah
Ответ на:
комментарий
от dilmah
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.
Похожие темы
- Форум Почему не работает? (2016)
- Форум PERL и use strict (2005)
- Форум install Yii2 (2015)
- Форум Помогите со скриптом PL (2006)
- Форум [Scheme][Lisp][Макры] Есть вопросы. (2010)
- Форум perl, switch, argv (2021)
- Форум помогите новичку исправить DSDT (2011)
- Форум FTP (2011)
- Форум конфликт версий setuptools (2016)
- Форум php-fpm config (2009)