sub RUN { my $arg = $_[0]; fork; do stuff on my $arg; ($arg is a file, stuff is making a report) } #### RUN(arg1); wait; RUN(arg2); wait; RUN(arg3); wait;