package Cookiesuper; use strict; use lib '/var/www/dspx/'; use CGI::Carp qw(fatalsToBrowser); use base 'CGI::Application'; use CGI::Application::Plugin::Session; sub cgiapp_init { my $self = shift; $self->session_config( DEFAULT_EXPIRY => '+4h', COOKIE_PARAMS => { -expires => '+4h', -name => 'DSO_Cookietest' }); } 1;