Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery
 
PerlMonks  

Re^3: Location redirect

by kennethk (Monsignor)
on Nov 02, 2012 at 11:02 UTC ( #1001944=note: print w/ replies, xml ) Need Help??


in reply to Re^2: Location redirect
in thread Location redirect

Have you read GENERATING_A_REDIRECTION_HEADER in CGI? What about that failed to work for you? Do you have some code in particular that has failed to function? If so, post it so we can be more specific. See How do I post a question effectively?.


#11929 First ask yourself `How would I do this without a computer?' Then have the computer do it the same way.


Comment on Re^3: Location redirect
Re^4: Location redirect
by himik (Acolyte) on Nov 02, 2012 at 11:52 UTC
    Ok. First i have page login.cgi where i have form for submition
    <form action="login.cgi" method="post"> username <input type="text" name="usr"> password:<input type="password" name="pwd"> <input type="submit" value="LOGIN"> </form>
    when i submit the form i take the parameters
    my $req = new CGI; my $usr = $req->param('usr'); my $pwd = $req->param('pwd');
    finaly i want to redirect the person to other page (also with login form) if it is with usr eq 'test' and password eq 'test'.
    if ( ($usr eq 'test') and ($pwd eq 'test')) { print $req->header(-type=>'text/html', -location=>"http://www.exampl +e.com/index.cgi?param1=10&param2=3&param3=2&user=$usr&password=$pwd") +; }
    On the page index.cgi in example.cgi there is
    <form action="index.cgi&param1=10&param2=3&param3=2" method="post"> username <input type="text" name="user"> password:<input type="password" name="password"> <input type="submit" value="LOGIN"> </form>
    This is working, but with get parameters. I want to do it with post. Thats all.

      This is working, but with get parameters. I want to do it with post. Thats all.

      ?? use HTTP::Request::Common as CGI.pm won't help you craft a HTTP POST message

        I can not work it out. Can you help me?

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1001944]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (13)
As of 2014-09-02 17:54 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite cookbook is:










    Results (25 votes), past polls