Re^2: how to move to new page on successful login

Replies are listed 'Best First'.
Re^3: how to move to new page on successful login by zentara (Cardinal) on Feb 26, 2008 at 12:55 UTC
Have you tried the print Location trick? Although I think it falls into the same boat as the header discussion by others. `#!/usr/bin/perl $url1 = 'http://zentara.zentara.net'; $url2 = 'http://zentara.zentara.net/~zentara'; if ($ENV{'HTTP_USER_AGENT'} =~ /Mozilla/ and not $ENV{'HTTP_USER_AGENT'} =~ /compatible/i ) { print "Location: $url1\n\n"; } else { print "Location: $url2\n\n"; }` [download] I'm not really a human, but I play one on earth. Cogito ergo sum a bum	[reply] [d/l]

Replies are listed 'Best First'.

Re^3: how to move to new page on successful login
by zentara (Cardinal) on Feb 26, 2008 at 12:55 UTC

#!/usr/bin/perl

$url1 = 'http://zentara.zentara.net';
$url2 = 'http://zentara.zentara.net/~zentara';

if ($ENV{'HTTP_USER_AGENT'} =~ /Mozilla/
and not $ENV{'HTTP_USER_AGENT'} =~ /compatible/i ) {
print "Location: $url1\n\n";
} else {
print "Location: $url2\n\n";
}
[download]

I'm not really a human, but I play one on earth. Cogito ergo sum a bum

[reply]
[d/l]