Select Code to Download

#!/usr/bin/perl
# forkit.pl
...
print "\n";

# And now, do the same thing using fork()

foreach (@files) {
open(EP,$_);
...
  }
}
print "\n";