here is the small example i wrote for you
it parses all hrefs from the original page
and downloading them into directory pages
forks at every link:

use LWP::Simple;

$a = get("http://perlmonks.org/index.pl?");

(getLink($1)) while ($a =~s/a href=\"(http:\/\/.+)\"//);

sub getLink{
        if($pid = fork()){
        $_ = shift; $filename = $& if /(?<=http:\/\/)[\w+|\.|\d+]+/;
        open OUT,">pages/$pid-$filename" or die $!;
        print OUT get($_);
        close OUT;
        exit(0);
        }
}
[download]

please correct mistakes if you notice anything
i'll accept your corrections with all gratitude
and humility
thank you