Am Thursday, dem 24. Apr 2008 schrieb Thomas Dickey:
> Then, if I add a link in the generated page, activating that link
> uses a GET - for my testcase. Perhaps your generated page is a form
> (also using POST). If I can see what the whole picture looks like,
> then I can respond better.
I send you a test-script with this mail.
The link named "New" is a normal link should use GET, and it does that
in other browsers, but not in my lynx.
Note: in this test the problem is just that the link seems to do
nothing. But with my real program I get lots of doublettes in my
database
--
AKFoerster
#!/usr/bin/perl
use CGI qw/:standard/;
if (param()) { showresult(); } else { startpage(); }
sub startpage {
print header,
start_html('Lynxtest: startpage'),
h1('Lynx test'),
start_form(-method=>"POST"),
"What's your name? ",textfield('name'),p,
"What's the combination?", p,
checkbox_group(-name=>'words',
-values=>['eenie','meenie','minie','moe'],
-defaults=>['eenie','minie']), p,
"What's your favorite color? ",
popup_menu(-name=>'color',
-values=>['red','green','blue','chartreuse']),p,
submit,
end_form, end_html;
}
sub showresult {
my $name = param('name');
my $keywords = join ', ',param('words');
my $color = param('color');
my $myself = url(-relative=>1);
print header,
start_html('Lynxtest: result'),
h1('Result'),
"Your name is ",em(escapeHTML($name)),p,
"The keywords are: ",em(escapeHTML($keywords)),p,
"Your favorite color is ",em(escapeHTML($color));
print p ("The following Link is the problem:",
"<a href='$myself'>New</a>");
print end_html;
}
_______________________________________________
Lynx-dev mailing list
[email protected]
http://lists.nongnu.org/mailman/listinfo/lynx-dev
