Re: Problem submitting a form

Steve Borruso (sborruso@stny.rr.com)
Thu, 29 Mar 2001 00:14:26 -0500


>Try adding a 'use LWP::Debug qw(+);' to see what your script is doing.
> (Did it get the right URL?  Is it posting the correct form data?  Is
>it sending the login cookie?  Etc.)

I've gotten past the 404 problem  when trying to submit the form
but now nothing is returned when I try form->click.

Included output from a $form->dump below, followed by output from
$form->form for the
form I'm trying to submit (x'd out pswds, etc.) The second output
doesn't show the submit
input controls. Gave up on trying to use LWP::Debug, couldn't get it to
generate any output.

Can't seem to get the $form->click to work,  tried variations like ...

$res = $ua->simple_request($form->click($name)) ;
$res = $ua->simple_request($form->click) ;
etc.

$ua is used earlier on and defined as -

   my $ua = LWP::UserAgent->new;
   $ua->cookie_jar(HTTP::Cookies->new(file => "$CustCookieFile",
autosave => 1));

Was going to try $form->make_request but figured since click() calls
this it wasn't worth trying.

Any assistance is most appreciated.
Steve


Output from $form->dump

POST http://www.bidville.com/edit_info.cfm itemnum=22167850 (hidden)
login=xxxxx
(hidden) password=xxxxxx (hidden) title= 2 just testing BV please don't
bid bold_title=
(checkbox) [*|1] banner_line= banner= (checkbox) [*|1] Category1=134
CatMenu_0=----------------------------------- (option)
[*-----------------------------------]
CatMenu_1=----------------------------------- (option)
[*-----------------------------------]
CatMenu_2=----------------------------------- (option)
[*-----------------------------------]
quantity=1 description=testing again (textarea) minimum_bid=1.00
reserve_bid=0.00
increment_valu=.2500 (hidden) take_it_price=
picture=http://xxx.xxx.com/backgrounds/sequins.jpg place1=2 (radio)
[*2|1]
sound=http:// place2=2 (radio) [*2|1] counter= (checkbox) [*|1]
featured=0 (hidden)
featured_cat= (checkbox) [*|1] auto_relist=5 date_end=2001-04-09
21:50:00 (hidden)
date_start=2001-03-20 21:50:00 (hidden) submit=Add Item (submit) =
(reset)


Output from $form->form

itemnum22167850loginxxxxxpasswordxxxxxxtitle 2 just testing BV please
don't bid
banner_lineCategory1134CatMenu_0-----------------------------------CatMenu_1-----------------------------------CatMenu_2-----------------------------------quantity1descriptiontesting

againminimum_bid1.00reserve_bid0.00increment_valu.2500take_it_pricepicturehttp://xxxx.xxxxx.com/backgrounds/sequins.jpgplace12soundhttp://place22featured0auto_relist5date_end2001-04-09

21:50:00date_start2001-03-20 21:50:00