use CGI; use CGI::Session; my $www = CGI->new(); my $session = CGI::Session->new( undef, $www, {Directory=>'/tmp'} ); my $imap = Net::IMAP::Simple->new('localhost'); if ($imap->login($www->param("log_username"), $www->param("log_passwor +d"))){ $session->_loggedIn(1); }
In reply to CGI::Session via IMAP by mhearse
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |