Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine

Re: no strict refs for blocks?

by moritz (Cardinal)
on Nov 02, 2011 at 11:13 UTC ( #935354=note: print w/ replies, xml ) Need Help??

in reply to no strict refs for blocks?

The use strict 'refs'; is unneeded, because strict. Apart from that, it seems to do what you want: when strict refs are disabled, &$routine_name() calls the sub with name $routine_name:

$ perl -Mstrict -wE 'sub f { say "f" }; my $x = "f"; { no strict "refs +"; &$x() }; &$x()' f Can't use string ("f") as a subroutine ref while "strict refs" in use +at -e line 1.

Comment on Re: no strict refs for blocks?
Select or Download Code

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://935354]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (6)
As of 2015-03-31 05:44 GMT
Find Nodes?
    Voting Booth?

    When putting a smiley right before a closing parenthesis, do you:

    Results (660 votes), past polls