Select Code to Download

#!/usr/bin/perl

...
    my $query = new CGI;
    print $query->redirect('https://xxxx.xxx/LogIn/index.html');
}

#!/usr/bin/perl

...
<a href='cgi-bin/logout.cgi'>Log out</a>

|;

#/usr/bin/perl

...
$session->clear(["email"]);

$session->delete();