use strict; use Functions::Alternate qw(func1 func2 func3); func1; func2; func3; print "\n";