File: 01_compile.t

package info (click to toggle)
libparams-util-perl 1.102-3
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 1,044 kB
  • sloc: perl: 5,398; makefile: 3
file content (22 lines) | stat: -rwxr-xr-x 455 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
#!/usr/bin/perl

use 5.00503;
use strict;

BEGIN
{
    $|  = 1;
    $^W = 1;
    $ENV{PERL_PARAMS_UTIL_PP} ||= 1;
}

use Test::More tests => 4;
use File::Spec::Functions ':ALL';

# Does the module load
use_ok('Params::Util');

# Double check that Scalar::Util is valid
require_ok('Scalar::Util');
ok($Scalar::Util::VERSION >= 1.10, 'Scalar::Util version is at least 1.18');
ok(defined &Scalar::Util::refaddr, 'Scalar::Util has a refaddr implementation');