in reply to POSTing with LWP::UserAgent
sub getLinkParse { use LWP::UserAgent; use HTTP::Request::Common; $sentence = "This is a test sentence."; $response = (new LWP::UserAgent)->request(POST 'http://www.link.cs.cmu.edu/cgi-bin/link1/construct-page-4 +.cgi#submit', [ Sentence => $sentence, Constituents => "1", <<<< this is a checkbox NullLinks => "1", <<<< this is a checkbox AllLinkages => "OFF", LinkDisplay => "on", ShortLength => "6", PageFile => "/docs/submit-sentence-4.html", InputFile => "/scripts/input-to-parser", Maintainer => "sleator\@cs.cmu.edu" ] ); exit -1 unless $response->is_success; $_ = $response->{_content}; print $_; } This is the origianl form on the site: <FORM METHOD="POST" ACTION="/cgi-bin/link1/construct-page-4.cgi#submit +"> <textarea name="Sentence" MAXLENGTH=200 wrap=virtual rows=3 cols=70>< +/textarea><br> <INPUT TYPE="checkbox" NAME="Constituents" CHECKED>Show constituent tr +ee <INPUT TYPE="checkbox" NAME="NullLinks" CHECKED>Allow null links   +; <INPUT TYPE="checkbox" NAME="AllLinkages" OFF>Show all linkages <INPUT TYPE="HIDDEN" NAME="LinkDisplay" VALUE="on"> <INPUT TYPE="HIDDEN" NAME="ShortLength" VALUE="6"> <INPUT TYPE="HIDDEN" NAME="PageFile" VALUE="/docs/submit-sentence-4.ht +ml"> <INPUT TYPE="HIDDEN" NAME="InputFile" VALUE="/scripts/input-to-parser" +> <INPUT TYPE="HIDDEN" NAME="Maintainer" VALUE="sleator@cs.cmu.edu"> <br> <INPUT TYPE="submit" VALUE="Submit one sentence"> <br> </FORM>
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Re: POSTing with LWP::UserAgent
by chromatic (Archbishop) on Jan 08, 2001 at 10:18 UTC | |
by Anonymous Monk on Jan 10, 2001 at 07:07 UTC | |
by repson (Chaplain) on Jan 10, 2001 at 09:01 UTC | |
by mycroft_ (Initiate) on Jan 11, 2001 at 09:28 UTC | |
by repson (Chaplain) on Jan 11, 2001 at 17:22 UTC |