From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more
1234567891011121314 # $Id$use strict;use File::Spec;use CGI::Session::Test::Default;use Test::More;my $t = CGI::Session::Test::Default->new( args=>{Directory=>File::Spec->catdir('t', 'sessiondata')});plan tests => $t->number_of_tests;$t->run();
# $Id$
use
strict;
File::Spec;
CGI::Session::Test::Default;
Test::More;
my
$t
= CGI::Session::Test::Default->new(
args
=>{
Directory
=>File::Spec->catdir(
't'
,
'sessiondata'
)});
plan
tests
=>
->number_of_tests;
->run();