есть хэш, что-то вроде:
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" }();
что не так?
<offtopic>
гы..просто к слову пришлось :
два треда почти подряд "вопрос про перл" "вопрос по перл"
по русски темы как-то неоднозначно звучат :)
</offtopic>
Кстати, а где-нибудь есть формальная спецификация перла? Уж до чего С++ монстр, но стандарт таки написали. У меня однокурсник на кафедре логики даже писал диплом (в 90-х годах) на тему спецификации С++.