view release on metacpan or  search on metacpan

t/01-compile.t  view on Meta::CPAN

2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
# `make test'. After `make install' it should work as `perl Maplat.t'
 
use strict;
use warnings;
 
#########################
 
# There is currently a problem under Windows with Date::Manip on
# certain non-english installations of XP (and possible others).
#
# So we set our time zone to CET
BEGIN {
    if(!defined($ENV{TZ})) {
        $ENV{TZ} = "CET";
    }
}
 
#########################
 
# change 'tests => 1' to 'tests => last_test_to_print';
 
use Test::More tests => 1;
BEGIN {
    use_ok('HTTP::Server::Simple::CGI::PreFork');