Re^9: Function name in a variable, can't recall the concept (introspection with ->can )

Replies are listed 'Best First'.
Re^10: Function name in a variable, can't recall the concept (introspection with ->can ) by Veltro (Hermit) on Apr 19, 2019 at 17:30 UTC
Oh yeah, haha, what have I been smoking! I'll probably stick with this then: `sub get_sub_by_name { my ($pkg, $name) = @_ ; no strict 'refs' ; if ( defined &{$pkg . '::'. $name} ) { return \&{$pkg . '::'. $name} ; } }` [download]	[reply] [d/l]
Re^11: Function name in a variable, can't recall the concept (introspection with ->can ) by ikegami (Patriarch) on Apr 19, 2019 at 18:06 UTC
`\&$name` works even under strict refs. No need to turn it off. You need to return something (`undef`?) in the else case.	[reply] [d/l] [select]
Re^12: Function name in a variable, can't recall the concept (introspection with ->can ) by Veltro (Hermit) on Apr 19, 2019 at 18:35 UTC
\&$name works even under strict refs. No need to turn it off. Perfect, makes the code even simpler You need to return something (undef?) in the else case. ~~Good question actually.~~ My tests didn't seem to need it... `sub test { ... } ; ... if ( my $s = get_sub_by_name( "", "test" ) ) { $s->() ; } else { print "No\n" ; }` [download]	[reply] [d/l]
Re^13: Function name in a variable, can't recall the concept (introspection with ->can ) by ikegami (Patriarch) on Apr 19, 2019 at 18:55 UTC
Re^11: Function name in a variable, can't recall the concept (introspection with ->can ) by LanX (Saint) on Apr 19, 2019 at 18:52 UTC
> I been smoking! something very strong it's still broken. update I was wrong, it works almost as well as ->can for non-class modules. Cheers Rolf _{(addicted to the Perl Programming Language :) Wikisyntax for the Monastery FootballPerl is like chess, only without the dice}	[reply]

update