Take a look at perldoc -f do to start. You may however, want to consider refactoring a little -- also look at perldoc -f require and perldoc perlmod for other methods.