For bonus style points, build a Threading perl and abstract all this even more:

#!perl -w
use Thread;
use strict;

my $count = 200;

foreach my $i (1..$count) {
  my $t = new Thread( &getit );
  $t->detach();
}

sub getit
{
  # do the fetch thang
}
[download]