use strict; my %data = ( runme => 1, notme => 0, ); for (keys %data) { $main::{$_}->() if $data{$_}; } sub runme { print "you should see me\n" } sub notme { print "don't look at me!\n" }
In reply to use the symbol table (re: strict refs)
by japhy
in thread "No strict refs" will be the death of me
by BlueLines
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |