Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

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/script.pl', \%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++; }

Comment on LWP and form bombardment
Download Code
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???
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

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://52238]
Approved by root
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (7)
As of 2014-12-20 13:46 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (95 votes), past polls