in reply to Re: How to make a variable in hard call.
in thread How to make a variable in hard call.

Same without eval: 

do { no strict "refs"; $subname->( 4 ) }

[download]
We can also use some trickery: 
( \&$subname )->( 4 )

[download]

In Section Seekers of Perl Wisdom