Select Code to Download

my $cgi = CGI->new;
...
    print "<a href='called.pl'>call</a></br></br>";
    }
$session->flush();

my $cgi = CGI->new;
my $session = CGI::Session->load() or die CGI::Session->errstr;
...
print $session->dump();
print "<a href='index.pl'>index</a></br></br>";
$session->flush();