> Hello ,
>
> Hope this work.....
>
> #!c:/Perl/bin/perl.exe
> use warnings;
> use strict;
> use CGI;
>
> my $query_obj=CGI->new();
>
> #creat webpage
> print $query_obj->header;
> print $query_obj->start_html('My First Webpage');
> if (!$query_obj->param){
> print
> $query_obj->start_form(-target=>'_new');
> print $query_obj->p;
> print "What is your name
>
",$query_obj->textfield(-name=>'text_field',-value=>'');
> print $query_obj->p;
> my @major=qw( English Biology Immunology );
> print " What is your major
>
",$query_obj->popup_menu(-name=>'menu_name',-value=>[EMAIL PROTECTED]);
> print $query_obj->p,$query_obj->submit;
> print $query_obj->end_form;
> }
> else{
> my $name=($query_obj->param('text_field') or '');
> print $query_obj->p,"This is your name
> $name","\n\n";
>
> print $query_obj->p;
> my $major=($query_obj->param('menu_name') or '');
> print "This is your major $major ";
> }
> print $query_obj->end_html;
>
> exit;
>
>
> ----------
> Prabu M A
>
Thanks Prabu. But I am just curious how to find out
the parameters that start_form method and others will
take. When I read the CGI.pm discription I see nowhere
in the POD talking about the details of parameters
that each method will take(just a little bit). Can you
point out how you get this kind of information?
Once again thank you very much,
Li
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
