codice:
        my $ua = LWP::UserAgent->new;
        my $response = $ua->get($url);
        if ($response->is_success) {
            return $response->content;
        }
        else {
            return "ERRORE";
        }
Questa è la routine che uso nel thread..

Fuori dal thread in un ciclo uso:


HTML::TreeBuilder
HTML::FormatText

Ho provato ad utilizzare undef per forzare a liberare la ram ma niente, me ne mangia a kg..

Io lancio 50 thread, poi faccio il join di quei 50..
Poi altri 50.. cosi per 4-5 volte..

Non capisco