Help for this page
@listofsubs = (\&sub1, \&sub2, \&sub3); foreach $sub (@listofsubs) { $sub->(); }
foreach $sub (@listofsubs) { $self->$sub() }
foreach $sub (@listofsubs) { if (not ref $sub) ... } $sub->(); }