File: g4.t

package info (click to toggle)
libcgi-session-perl 4.14-1
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 428 kB
  • ctags: 167
  • sloc: perl: 1,809; makefile: 46
file content (14 lines) | stat: -rw-r--r-- 334 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
# $Id: /mirror/cgi-session/trunk/t/g4.t 220 2005-08-30T11:47:14.305150Z sherzodr  $

use strict;
use diagnostics;

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();