Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Passing Parameters to CGI script?

by anbutechie (Sexton)
on Aug 24, 2009 at 04:16 UTC ( [id://790725]=perlquestion: print w/replies, xml ) Need Help??

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

Hi,
I m learning CGI script; I have created two scripts one for login page and another one for home page.On successful login (I used redirectional header to navigate to home page), i have to display the username in home page; How can i pass the username to home page which is entered in login page.

My sample script is:
Login.cgi
#!/usr/local/bin/perl
use CGI qw/:standard/;
if(param('Login'))
{
#Validate user name and password; if valid user then
print redirect('http:\\localhost\cgi-bin\home.cgi');
else {print header;}
}
else{print header;}
print start_html('Login screen'),
start_form,
textfield(-name=>'username',-size=>50, -maxlength=>80);
textfield(-name=>'Password',-size=>50, -maxlength=>80);
submit('Login'),reset,
end_form;
end_html;



home.cgi

#!/usr/local/bin/perl
use CGI qw/:standard/;

print header,
start_html('home'),
start_form,
Welcome, username which is enetered in login screen
end_form;
end_html;
Regards,
Anbarasu

Replies are listed 'Best First'.
Re: Passing Parameters to CGI script?
by james2vegas (Chaplain) on Aug 24, 2009 at 04:43 UTC
Re: Passing Parameters to CGI script?
by leighsharpe (Monk) on Aug 24, 2009 at 06:34 UTC
    Can you show us the two scripts you already have?
    Passing a value from one page to another can be done in many ways. If we can see what you have, we can suggest the most appropriate.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: perlquestion [id://790725]
Approved by targetsmart
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others taking refuge in the Monastery: (6)
As of 2024-04-19 06:25 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found