my $proto = ($ENV{HTTPS} ? "https" : "http");
if ($proto eq "http" || !($query->param('username')) || !($query->param('password'))) {
my $proto = ($ENV{HTTPS} ? "https" : "http");
if ($proto eq "http" || !($query->param('username')) || !($query->param('password'))) {