my $s = CGI::Session->load($session_id); if ( $s->is_expired ) {...