#!/usr/bin/perl -l use autodie; use common::sense; sub walk { use strict qw/refs/; use warnings FATAL => 'syntax'; print "Walk this!"; } sub run { use strict qw/refs/; use warnings FATAL => 'syntax'; print "Run with this!"; } my $walkable = defined &{ 'walk' }; undef &{'walk'}; my $runable = \&{ 'run' }; &$runable;
In reply to Re: undef/defined &{$name} while "strict refs"
by Khen1950fx
in thread undef/defined &{$name} while "strict refs"
by anazawa
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |