Help for this page
#!/usr/bin/perl ... my @subs = ('test'); $subs[0]();
#!/usr/bin/perl ... my @subs = (\&test); $subs[0]->();