Re: Can't Reference a Sub by Variable when using Strict

Erm, because that's what use strict does. You either need to use coderefs (my %lists = ( stuff => \&test1, things => \&test2 );), or use the grandfathered goto syntax:

for my $i ( keys %lists ) {
  my $coderef = \&{ $i };
  &{ $coderef };
}
[download]

Read perldoc strict for more details.

Comment on Re: Can't Reference a Sub by Variable when using Strict Select or Download Code

Replies are listed 'Best First'.
Re^2: Can't Reference a Sub by Variable when using Strict by chromatic (Archbishop) on Oct 04, 2004 at 06:18 UTC
Did you try your code under strict? There's a symbolic reference of the same kind in the second line.	[reply]
Re^3: Can't Reference a Sub by Variable when using Strict by broquaint (Abbot) on Oct 04, 2004 at 07:41 UTC
Creating symbolic references to subroutines is quite valid under strictures e.g `use strict; sub foo { print "It's all good."; } my $subref = \&{ "foo" }; &$subref; __output__ It's all good.` [download] HTH `_________ broquaint`	[reply] [d/l]
Re^4: Can't Reference a Sub by Variable when using Strict by tachyon (Chancellor) on Oct 04, 2004 at 12:32 UTC
That's a bug not a feature :-) `C:\>perl -MO=Deparse test.pl sub foo { print q[It's all good.]; } my $subref = \&{'foo';}; &$subref;` [download]	[reply] [d/l]
Re^3: Can't Reference a Sub by Variable when using Strict by Fletch (Bishop) on Oct 04, 2004 at 14:13 UTC
`freebie:~ 1085> cat bar + 10:08:26 use strict; my %lists; for my $i ( keys %lists ) { my $coderef = \&{ $i }; &{ $coderef }(); } freebie:~ 1086> perl -c bar + 10:08:28 bar syntax OK` [download] This is perfectly valid due to the `goto` exception I mentioned. If you read `perldoc strict`: `There is one exception to this rule: $bar = \&{'foo'}; &$bar; is allowed so that "goto &$AUTOLOAD" would not break unde +r stricture.` [download]	[reply] [d/l] [select]
Re^4: Can't Reference a Sub by Variable when using Strict by chromatic (Archbishop) on Oct 04, 2004 at 17:50 UTC
So it is; thanks!	[reply]