comment on

Hi all

I have a simple perl cgi script which redirects quite happily:

#!C:\perl\bin\perl.exe -wT
use strict; 
use CGI qw/:standard/; 
my $cgi = new CGI; 
print $cgi->redirect( -uri => 'http://perl.about.com/' );
[download]

trying to do the same in another script (relevant bits below)

if ($match==1) {
    my $r=new CGI;
    print $r->redirect( -uri => 'http://perl.about.com/' );
}
[download]

results in a web page with my debug prints in which says

Got the following headers:
HTTP_REMOTE_USER: setheri
HTTP_HOST: localhost
HTTP_USER_AGENT: Fiddler
sid is setheri


Entering user test

Check of hash

sid2 is setheri

testing for existence

Item is setheri
we have a match

Status: 302 Found
Location: http://perl.about.com/
[download]

The script basically gets the HTTP header value REMOTE_USER and if that is in a given list redirects. Don't ask - forced to do it that way by system restrictions. Can anyone shed any light as to why the second redirect does not work?

Many thanks

In reply to Problem with CGI.pm redirects by stevee

Are you posting in the right place? Check out Where do I post X? to know for sure.
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>
Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
Want more info? How to link or How to display code and escape characters are good places to start.


good chemistry is complicated, and a little bit messy -LW
	PerlMonks