my $s = CGI::Session->load("driver:mysql", 
    undef, 
    {
        DataSource  => "dbi:mysql:$DB_Name",
        User        => $DB_User,
        Password    => $DB_Pass 
    });

$app->redirect() if ($s->is_empty);