Reverend Phil has asked for the wisdom of the Perl Monks concerning the following question:
$mess_nosource is just the text on the screen. debug_plop just dumps my params. The output looks fine, but the dump looks like:sub load_items { ($source, $po) = ( param('source'),param('po') ); if(!$source || !$po){ param(-name=>'action', -value=>''); print header(), start_html(-title=>"Title", -style=>{-code=>$got_no_style}, -BGCOLOR=>'tan'); print h1({class=>'Default'},'ERROR'), p({class=>'Error'},$mess_nosource); print start_multipart_form(), submit(-name=>'junk', -label=>'Return to Source/Ship Metho +d/PO'), hidden(-name=>'flags', -value=>$flags), hidden(-name=>'source', -value=>uc($source)), hidden(-name=>'po', -value=>$po), hidden(-name=>'file', -value=>param($file)), hidden(-name=>'action', -value=>'Accept These Customers'); end_form(),"</CENTER>"; debug_plop(); } else { #not hit right now } }
My problem is, the line param(-name=>'action',-value=>'') successfully deletes that parameter, but my hidden() field with a name of 'action' is now not passing along the value.key source value zot key sm value 85 key po value key file value C:\temp\CGItemp4840001 key flags value 2345 key action value
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
ZOT!: CGI: Trouble changing/deleting a param
by Reverend Phil (Pilgrim) on Jan 16, 2001 at 21:36 UTC |