in reply to Re^2: how to move to new page on successful login
in thread how to move to new page on successful login
#!/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"; }
|
|---|