Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight

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
[Corion]: marto: Redoing something on new infrastructure sounds fun. At least you can reuse your previous experience :)
[marto]: I'm looking forwads to it. The video sources are dying, and they don't have the hardware to play them back (old tape formats, not just VHS + Laserdisc etc)
[marto]: I'll be interested to see what difference in terms of file size/quality the new codecs make. I enjoy working on things like this, so that's a bonus
[Corion]: Ah, cool! So it's not an inhouse youtube but for a wider consumption
[marto]: last time it was IE6 clients, now they're on 11, so more scope there also, in terms of UI and playback

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (8)
As of 2017-07-28 09:17 GMT
Find Nodes?
    Voting Booth?
    I came, I saw, I ...

    Results (425 votes). Check out past polls.