1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
|
#/usr/bin/env perl
use strict;
use warnings;
# I tried 'require'-ing modules but that did not work.
use CGI::Session::ExpireSessions; # For the version #.
use Test::More;
use Carp;
use CGI::Session;
use File::Spec;
# ----------------------
pass('All external modules loaded');
my(@modules) = qw
/
Carp
CGI::Session
File::Spec
/;
diag "Testing CGI::Session::ExpireSessions V $CGI::Session::ExpireSessions::VERSION";
for my $module (@modules)
{
no strict 'refs';
my($ver) = ${$module . '::VERSION'} || 'N/A';
diag "Using $module V $ver";
}
done_testing;
|
