Logging in.....

http://username:password@domain.com/protected/ ##

##

#!/usr/bin/perl
use CGI;
my $url = 'domain.com/protected/redir.htm';
my $q = CGI->new();
my $login_url = sprintf "http://%s:%s\@$url", 
                    $q->param('username'), $q->param('password');
print $q->header;
print <
Logging in.....



HTML

##

##


Redirecting.....