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