How to handle the option part

Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

I want to get data from database by LWP::Simple::get. Regular one page only show up 20 items, My data total has 402 items. I use:

$mydata=get('http://www.ncbi.nlm.nih.gov/entrez/query.fcgi?db=protein&
+cmd=search&term=RGS');
[download]

I only can get 20 items. The source code has options from 10,20,100,200,500. By hand if you choice SHOW=500, you can get 402 items. and then the URL is: http://www.ncbi.nlm.nih.gov/entrez/query.fcgi?CMD=search&DB=protein But if you use above URL you will get nothing. The source code is:

&nbsp;Show:&nbsp;<select name="dispmax" onChange="form.dispmax1.select
+edIndex=selectedIndex;"><option>5</option>
<option>10</option>
<option selected>20</option>
<option>50</option>
<option>100</option>
<option>200</option>
<option>500</option>
</select>
[download]

What I can do about that? Please help! Thanks in advance!

Comment on How to handle the option part Select or Download Code

Replies are listed 'Best First'.
Re: How to handle the option part by arturo (Vicar) on Apr 20, 2003 at 18:44 UTC
It should be pretty simple; note that the name attribute on the select is `dispmax`. So that's the value you need to send to the CGI that handles the form submission. Submitted variables, when using a `GET` request (as you are here) are separated by ampersands and take the form `name=value` (if that's confusing you, just look a the URLs you are already using for an example), so if you simply add `&dispmax=500` to the URL that you are fetching, that ought to do it. P.S. This is more of an HTML question than a Perl question. You might want to try W3C Schools to learn more about HTML. HTH If not P, what? Q maybe? "Sidney Morgenbesser"	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re: How to handle the option part
by arturo (Vicar) on Apr 20, 2003 at 18:44 UTC

It should be pretty simple; note that the name attribute on the select is dispmax. So that's the value you need to send to the CGI that handles the form submission. Submitted variables, when using a GET request (as you are here) are separated by ampersands and take the form name=value (if that's confusing you, just look a the URLs you are already using for an example), so if you simply add &dispmax=500 to the URL that you are fetching, that ought to do it.

P.S. This is more of an HTML question than a Perl question. You might want to try W3C Schools to learn more about HTML.

HTH

If not P, what? Q maybe?
"Sidney Morgenbesser"

[reply]
[d/l]
[select]