Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

LWP and form bombardment

by agoth (Chaplain)
on Jan 16, 2001 at 18:22 UTC ( #52238=perlquestion: print w/replies, xml ) Need Help??
agoth has asked for the wisdom of the Perl Monks concerning the following question:

I'm trying to test one of my own *.pl scripts which takes form input and does DBI / file access behind the scenes.

I want to check hit rate of up to 30 submissions per second, but under the control of one script I can't seem to do it, each LWP request having to wait for its own return, unless I'm missing something?? I guess I'm heading for something like threading or having to kick off 30 concurrent perl processes per second which isnt very nice. Any better solutions?? code below.

NB Pls ignore dot star for the moment

use LWP::UserAgent; use HTTP::Request::Common qw(POST); my %field = ('name' => 'value'); my @rcs; for (1..100) { push @uas, LWP::UserAgent->new; } my $req = POST 'http://server/cgi/', \%field; for (@uas) { my $html = $_->request($req)->as_string; if ($html =~ /<return>(.*)?<\/return>/s) { push @rcs, "return is $1\n"; } else { push @rcs, "error"; } } my $i = 0; for (@rcs) { print "$i : $_\n"; $i++; }

Replies are listed 'Best First'.
Re: LWP and form bombardment
by clemburg (Curate) on Jan 16, 2001 at 18:45 UTC
      Thanks for the pointer and the links, including merlyn's below, just what I needed.

      Im more embarrassed that when i got the libwww bundle off CPAN earlier in the day, i didn't notice the Parallel...

Re: LWP and form bombardment
by merlyn (Sage) on Jan 16, 2001 at 22:48 UTC
Re: LWP and form bombardment
by agoth (Chaplain) on Jan 16, 2001 at 18:25 UTC
    PS. I have used the &callback method before but cant see how it might help in this case???

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://52238]
Approved by root
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others pondering the Monastery: (6)
As of 2018-03-24 22:02 GMT
Find Nodes?
    Voting Booth?
    When I think of a mole I think of:

    Results (299 votes). Check out past polls.