Report for SQL-Interpolate-0.32

Back
From: metabase:user:e667a2a9-6c14-1014-9503-c31448f0d22a
Subject: FAIL SQL-Interpolate-0.32 v5.20.0 
Date: 2014-07-17T03:01:42Z

This distribution has been tested as part of the CPAN Testers
project, supporting the Perl programming language.  See
http://wiki.cpantesters.org/ for more information or email
questions to cpan-testers-discuss@perl.org


--
Dear David Manura,

This is a computer-generated report for SQL-Interpolate-0.32
on perl 5.20.0, created by CPAN-Reporter-1.2012.

Thank you for uploading your work to CPAN.  However, there was a problem
testing your distribution.

If you think this report is invalid, please consult the CPAN Testers Wiki
for suggestions on how to avoid getting FAIL reports for missing library
or binary dependencies, unsupported operating systems, and so on:

http://wiki.cpantesters.org/wiki/CPANAuthorNotes

Sections of this report:

    * Tester comments
    * Program output
    * Prerequisites
    * Environment and other context

------------------------------
TESTER COMMENTS
------------------------------

Additional comments from tester:

this report is from an automated smoke testing program
and was not reviewed by a human for accuracy

------------------------------
PROGRAM OUTPUT
------------------------------

Output from 'C:\Strawberry\perl\bin\perl.exe ./Build test':

t\dbi.t ........... ok
t\dbi_filter.t .... ok
t\dbi_interp.t .... ok
t\dist.t .......... ok

#   Failed test 'INSERT inline hashref'
#   at t\filter.t line 57.
#          got: '[ 'INSERT INTO mytable ', { 'one' => 1, 'two' => 2 } ]'
#     expected: '[ 'INSERT INTO mytable ', { 'two' => 2, 'one' => 1 } ]'
# Looks like you failed 1 test of 17.
t\filter.t ........ 
Dubious, test returned 1 (wstat 256, 0x100)
Failed 1/17 subtests 
t\macro.t ......... ok
t\pod-coverage.t .. ok
t\pod.t ........... ok

#   Failed test 'INSERT hashref of sql_var + sql()'
#   at t/lib.pl line 36.
#     Structures begin differing at:
#          $got->[0] = 'INSERT INTO mytable (three, two, one) VALUES(3,  ?, ?)'
#     $expected->[0] = 'INSERT INTO mytable (three, two, one) VALUES(3, ?,  ?)'
$VAR1 = [
          'INSERT INTO mytable (three, two, one) VALUES(3,  ?, ?)',
          [
            5,
            bless( {
                     'value' => \5,
                     'type' => 1
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            1,
            bless( {
                     'value' => \1
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR2 = [
          'INSERT INTO mytable (three, two, one) VALUES(3, ?,  ?)',
          [
            5,
            $VAR1->[1][1]
          ],
          [
            1,
            bless( {
                     'value' => \1
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR3 = 'INSERT hashref of sql_var + sql()';

#   Failed test 'INSERT hashref of sql_var + sql() OO'
#   at t/lib.pl line 36.
#     Structures begin differing at:
#          $got->[0] = 'INSERT INTO mytable (three, two, one) VALUES(3,  ?, ?)'
#     $expected->[0] = 'INSERT INTO mytable (three, two, one) VALUES(3, ?,  ?)'
$VAR1 = [
          'INSERT INTO mytable (three, two, one) VALUES(3,  ?, ?)',
          [
            5,
            bless( {
                     'value' => \5,
                     'type' => 1
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            1,
            bless( {
                     'value' => \1
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR2 = [
          'INSERT INTO mytable (three, two, one) VALUES(3, ?,  ?)',
          [
            5,
            $VAR1->[1][1]
          ],
          [
            1,
            bless( {
                     'value' => \1
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR3 = 'INSERT hashref of sql_var + sql() OO';

#   Failed test 'INSERT hashref of sql_var + sql() closure'
#   at t/lib.pl line 36.
#     Structures begin differing at:
#          $got->[0] = 'INSERT INTO mytable (three, two, one) VALUES(3,  ?, ?)'
#     $expected->[0] = 'INSERT INTO mytable (three, two, one) VALUES(3, ?,  ?)'
$VAR1 = [
          'INSERT INTO mytable (three, two, one) VALUES(3,  ?, ?)',
          [
            5,
            bless( {
                     'value' => \5,
                     'type' => 1
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            1,
            bless( {
                     'value' => \1
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR2 = [
          'INSERT INTO mytable (three, two, one) VALUES(3, ?,  ?)',
          [
            5,
            $VAR1->[1][1]
          ],
          [
            1,
            bless( {
                     'value' => \1
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR3 = 'INSERT hashref of sql_var + sql() closure';

#   Failed test 'INSERT hashref of sql_var + sql() closure2'
#   at t/lib.pl line 36.
#     Structures begin differing at:
#          $got->[0] = 'INSERT INTO mytable (three, two, one) VALUES(3,  ?, ?)'
#     $expected->[0] = 'INSERT INTO mytable (three, two, one) VALUES(3, ?,  ?)'
$VAR1 = [
          'INSERT INTO mytable (three, two, one) VALUES(3,  ?, ?)',
          [
            5,
            bless( {
                     'value' => \5,
                     'type' => 1
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            1,
            bless( {
                     'value' => \1
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR2 = [
          'INSERT INTO mytable (three, two, one) VALUES(3, ?,  ?)',
          [
            5,
            $VAR1->[1][1]
          ],
          [
            1,
            bless( {
                     'value' => \1
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR3 = 'INSERT hashref of sql_var + sql() closure2';

#   Failed test 'SET hashref of sql_var types, sql()'
#   at t/lib.pl line 36.
#     Structures begin differing at:
#          $got->[0] = 'UPDATE mytable SET one=?, two= ?, three=3'
#     $expected->[0] = 'UPDATE mytable SET three=3, one=?, two= ?'
$VAR1 = [
          'UPDATE mytable SET one=?, two= ?, three=3',
          [
            1,
            bless( {
                     'value' => \1
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            bless( {
                     'value' => \5,
                     'type' => 1
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR2 = [
          'UPDATE mytable SET three=3, one=?, two= ?',
          [
            1,
            bless( {
                     'value' => \1
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            $VAR1->[2][1]
          ]
        ];
$VAR3 = 'SET hashref of sql_var types, sql()';

#   Failed test 'SET hashref of sql_var types, sql() OO'
#   at t/lib.pl line 36.
#     Structures begin differing at:
#          $got->[0] = 'UPDATE mytable SET one=?, two= ?, three=3'
#     $expected->[0] = 'UPDATE mytable SET three=3, one=?, two= ?'
$VAR1 = [
          'UPDATE mytable SET one=?, two= ?, three=3',
          [
            1,
            bless( {
                     'value' => \1
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            bless( {
                     'value' => \5,
                     'type' => 1
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR2 = [
          'UPDATE mytable SET three=3, one=?, two= ?',
          [
            1,
            bless( {
                     'value' => \1
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            $VAR1->[2][1]
          ]
        ];
$VAR3 = 'SET hashref of sql_var types, sql() OO';

#   Failed test 'SET hashref of sql_var types, sql() closure'
#   at t/lib.pl line 36.
#     Structures begin differing at:
#          $got->[0] = 'UPDATE mytable SET one=?, two= ?, three=3'
#     $expected->[0] = 'UPDATE mytable SET three=3, one=?, two= ?'
$VAR1 = [
          'UPDATE mytable SET one=?, two= ?, three=3',
          [
            1,
            bless( {
                     'value' => \1
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            bless( {
                     'value' => \5,
                     'type' => 1
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR2 = [
          'UPDATE mytable SET three=3, one=?, two= ?',
          [
            1,
            bless( {
                     'value' => \1
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            $VAR1->[2][1]
          ]
        ];
$VAR3 = 'SET hashref of sql_var types, sql() closure';

#   Failed test 'SET hashref of sql_var types, sql() closure2'
#   at t/lib.pl line 36.
#     Structures begin differing at:
#          $got->[0] = 'UPDATE mytable SET one=?, two= ?, three=3'
#     $expected->[0] = 'UPDATE mytable SET three=3, one=?, two= ?'
$VAR1 = [
          'UPDATE mytable SET one=?, two= ?, three=3',
          [
            1,
            bless( {
                     'value' => \1
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            bless( {
                     'value' => \5,
                     'type' => 1
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR2 = [
          'UPDATE mytable SET three=3, one=?, two= ?',
          [
            1,
            bless( {
                     'value' => \1
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            $VAR1->[2][1]
          ]
        ];
$VAR3 = 'SET hashref of sql_var types, sql() closure2';

#   Failed test 'WHERE hashref of \$x, sql_var typed'
#   at t/lib.pl line 36.
#     Structures begin differing at:
#          $got->[0] = 'WHERE (x=? AND y= ?) AND z= ?'
#     $expected->[0] = 'WHERE (y= ? AND x=?) AND z= ?'
$VAR1 = [
          'WHERE (x=? AND y= ?) AND z= ?',
          [
            5,
            bless( {
                     'value' => \5
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            bless( {
                     'value' => \5,
                     'type' => 1
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            bless( {
                     'value' => \5
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR2 = [
          'WHERE (y= ? AND x=?) AND z= ?',
          [
            5,
            $VAR1->[2][1]
          ],
          [
            5,
            bless( {
                     'value' => $VAR1->[2][1]{'value'}
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            bless( {
                     'value' => $VAR1->[2][1]{'value'}
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR3 = 'WHERE hashref of \\$x, sql_var typed';

#   Failed test 'WHERE hashref of \$x, sql_var typed OO'
#   at t/lib.pl line 36.
#     Structures begin differing at:
#          $got->[0] = 'WHERE (x=? AND y= ?) AND z= ?'
#     $expected->[0] = 'WHERE (y= ? AND x=?) AND z= ?'
$VAR1 = [
          'WHERE (x=? AND y= ?) AND z= ?',
          [
            5,
            bless( {
                     'value' => \5
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            bless( {
                     'value' => \5,
                     'type' => 1
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            bless( {
                     'value' => \5
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR2 = [
          'WHERE (y= ? AND x=?) AND z= ?',
          [
            5,
            $VAR1->[2][1]
          ],
          [
            5,
            bless( {
                     'value' => $VAR1->[2][1]{'value'}
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            bless( {
                     'value' => $VAR1->[2][1]{'value'}
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR3 = 'WHERE hashref of \\$x, sql_var typed OO';

#   Failed test 'WHERE hashref of \$x, sql_var typed closure'
#   at t/lib.pl line 36.
#     Structures begin differing at:
#          $got->[0] = 'WHERE (x=? AND y= ?) AND z= ?'
#     $expected->[0] = 'WHERE (y= ? AND x=?) AND z= ?'
$VAR1 = [
          'WHERE (x=? AND y= ?) AND z= ?',
          [
            5,
            bless( {
                     'value' => \5
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            bless( {
                     'value' => \5,
                     'type' => 1
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            bless( {
                     'value' => \5
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR2 = [
          'WHERE (y= ? AND x=?) AND z= ?',
          [
            5,
            $VAR1->[2][1]
          ],
          [
            5,
            bless( {
                     'value' => $VAR1->[2][1]{'value'}
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            bless( {
                     'value' => $VAR1->[2][1]{'value'}
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR3 = 'WHERE hashref of \\$x, sql_var typed closure';

#   Failed test 'WHERE hashref of \$x, sql_var typed closure2'
#   at t/lib.pl line 36.
#     Structures begin differing at:
#          $got->[0] = 'WHERE (x=? AND y= ?) AND z= ?'
#     $expected->[0] = 'WHERE (y= ? AND x=?) AND z= ?'
$VAR1 = [
          'WHERE (x=? AND y= ?) AND z= ?',
          [
            5,
            bless( {
                     'value' => \5
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            bless( {
                     'value' => \5,
                     'type' => 1
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            bless( {
                     'value' => \5
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR2 = [
          'WHERE (y= ? AND x=?) AND z= ?',
          [
            5,
            $VAR1->[2][1]
          ],
          [
            5,
            bless( {
                     'value' => $VAR1->[2][1]{'value'}
                   }, 'SQL::Interpolate::Variable' )
          ],
          [
            5,
            bless( {
                     'value' => $VAR1->[2][1]{'value'}
                   }, 'SQL::Interpolate::Variable' )
          ]
        ];
$VAR3 = 'WHERE hashref of \\$x, sql_var typed closure2';

#   Failed test 'WHERE hashref of \$x, sql()'
#   at t/lib.pl line 36.
#     Structures begin differing at:
#          $got->[0] = 'WHERE (x=? AND y=z)'
#     $expected->[0] = 'WHERE (y=z AND x=?)'
$VAR1 = [
          'WHERE (x=? AND y=z)',
          5
        ];
$VAR2 = [
          'WHERE (y=z AND x=?)',
          5
        ];
$VAR3 = 'WHERE hashref of \\$x, sql()';

#   Failed test 'WHERE hashref of \$x, sql() OO'
#   at t/lib.pl line 36.
#     Structures begin differing at:
#          $got->[0] = 'WHERE (x=? AND y=z)'
#     $expected->[0] = 'WHERE (y=z AND x=?)'
$VAR1 = [
          'WHERE (x=? AND y=z)',
          5
        ];
$VAR2 = [
          'WHERE (y=z AND x=?)',
          5
        ];
$VAR3 = 'WHERE hashref of \\$x, sql() OO';

#   Failed test 'WHERE hashref of \$x, sql() closure'
#   at t/lib.pl line 36.
#     Structures begin differing at:
#          $got->[0] = 'WHERE (x=? AND y=z)'
#     $expected->[0] = 'WHERE (y=z AND x=?)'
$VAR1 = [
          'WHERE (x=? AND y=z)',
          5
        ];
$VAR2 = [
          'WHERE (y=z AND x=?)',
          5
        ];
$VAR3 = 'WHERE hashref of \\$x, sql() closure';

#   Failed test 'WHERE hashref of \$x, sql() closure2'
#   at t/lib.pl line 36.
#     Structures begin differing at:
#          $got->[0] = 'WHERE (x=? AND y=z)'
#     $expected->[0] = 'WHERE (y=z AND x=?)'
$VAR1 = [
          'WHERE (x=? AND y=z)',
          5
        ];
$VAR2 = [
          'WHERE (y=z AND x=?)',
          5
        ];
$VAR3 = 'WHERE hashref of \\$x, sql() closure2';
# Looks like you failed 16 tests of 167.
t\sql_interp.t .... 
Dubious, test returned 16 (wstat 4096, 0x1000)
Failed 16/167 subtests 

Test Summary Report
-------------------
t\filter.t      (Wstat: 256 Tests: 17 Failed: 1)
  Failed test:  12
  Non-zero exit status: 1
t\sql_interp.t  (Wstat: 4096 Tests: 167 Failed: 16)
  Failed tests:  66-69, 122-125, 154-157, 162-165
  Non-zero exit status: 16
Files=9, Tests=256,  2 wallclock secs ( 0.06 usr +  0.03 sys =  0.09 CPU)
Result: FAIL
Failed 2/9 test programs. 17/256 subtests failed.

------------------------------
PREREQUISITES
------------------------------

Prerequisite modules loaded:

opt_requires:

    Module         Need Have
    -------------- ---- ----
    Filter::Simple 0    0.91
    Text::Balanced 1.87 2.02


------------------------------
ENVIRONMENT AND OTHER CONTEXT
------------------------------

Environment variables:

    AUTOMATED_TESTING = 1
    COMSPEC = C:\Windows\system32\cmd.exe
    NUMBER_OF_PROCESSORS = 1
    PATH = C:\Windows\system32;C:\Windows;C:\Windows\System32\Wbem;C:\Windows\System32\WindowsPowerShell\v1.0\;C:\Strawberry\c\bin;C:\Strawberry\perl\site\bin;C:\Strawberry\perl\bin;C:\Program Files\Git\cmd
    PERL5LIB = 
    PERL5OPT = 
    PERL5_CPANPLUS_IS_RUNNING = 3164
    PERL5_CPAN_IS_RUNNING = 3164
    PERL5_CPAN_IS_RUNNING_IN_RECURSION = 3976,3164
    PERL_CR_SMOKER_CURRENT = SQL-Interpolate-0.32
    PERL_EXTUTILS_AUTOINSTALL = --defaultdeps
    PERL_MM_USE_DEFAULT = 1
    PROCESSOR_IDENTIFIER = x86 Family 21 Model 1 Stepping 2, AuthenticAMD
    TEMP = C:\Users\albie\AppData\Local\Temp

Perl special variables (and OS-specific diagnostics, for MSWin32):

    $^X = C:\Strawberry\perl\bin\perl.exe
    $UID/$EUID = 0 / 0
    $GID = 0
    $EGID = 0
    Win32::GetOSName = Win7
    Win32::GetOSVersion = Service Pack 1, 6, 1, 7601, 2, 1, 0, 256, 1
    Win32::FsType = NTFS
    Win32::IsAdminUser = 0

Perl module toolchain versions installed:

    Module              Have    
    ------------------- --------
    CPAN                2.05    
    CPAN::Meta          2.141520
    Cwd                 3.47    
    ExtUtils::CBuilder  0.280216
    ExtUtils::Command   1.18    
    ExtUtils::Install   1.68    
    ExtUtils::MakeMaker 6.98    
    ExtUtils::Manifest  1.63    
    ExtUtils::ParseXS   3.24    
    File::Spec          3.47    
    JSON                2.90    
    JSON::PP            2.27203 
    Module::Build       0.4205  
    Module::Signature   n/a     
    Parse::CPAN::Meta   1.4414  
    Test::Harness       3.32    
    Test::More          1.001003
    YAML                0.94    
    YAML::Syck          1.27    
    version             0.9908  


--

Summary of my perl5 (revision 5 version 20 subversion 0) configuration:
   
  Platform:
    osname=MSWin32, osvers=6.2, archname=MSWin32-x86-multi-thread-64int
    uname='Win32 strawberry-perl 5.20.0.1 #1 Fri May 30 23:25:11 2014 i386'
    config_args='undef'
    hint=recommended, useposix=true, d_sigaction=undef
    useithreads=define, usemultiplicity=define
    use64bitint=define, use64bitall=undef, uselongdouble=undef
    usemymalloc=n, bincompat5005=undef
  Compiler:
    cc='gcc', ccflags =' -s -O2 -DWIN32  -DPERL_TEXTMODE_SCRIPTS -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO -fwrapv -fno-strict-aliasing -mms-bitfields',
    optimize='-s -O2',
    cppflags='-DWIN32'
    ccversion='', gccversion='4.8.2', gccosandvers=''
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=12345678
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
    ivtype='long long', ivsize=8, nvtype='double', nvsize=8, Off_t='long long', lseeksize=8
    alignbytes=8, prototype=define
  Linker and Libraries:
    ld='g++', ldflags ='-s -L"C:\STRAWB~1\perl\lib\CORE" -L"C:\STRAWB~1\c\lib"'
    libpth=C:\STRAWB~1\c\lib C:\STRAWB~1\c\i686-w64-mingw32\lib C:\STRAWB~1\c\lib\gcc\i686-w64-mingw32\4.8.2
    libs=-lmoldname -lkernel32 -luser32 -lgdi32 -lwinspool -lcomdlg32 -ladvapi32 -lshell32 -lole32 -loleaut32 -lnetapi32 -luuid -lws2_32 -lmpr -lwinmm -lversion -lodbc32 -lodbccp32 -lcomctl32
    perllibs=-lmoldname -lkernel32 -luser32 -lgdi32 -lwinspool -lcomdlg32 -ladvapi32 -lshell32 -lole32 -loleaut32 -lnetapi32 -luuid -lws2_32 -lmpr -lwinmm -lversion -lodbc32 -lodbccp32 -lcomctl32
    libc=, so=dll, useshrplib=true, libperl=libperl520.a
    gnulibc_version=''
  Dynamic Linking:
    dlsrc=dl_win32.xs, dlext=xs.dll, d_dlsymun=undef, ccdlflags=' '
    cccdlflags=' ', lddlflags='-mdll -s -L"C:\STRAWB~1\perl\lib\CORE" -L"C:\STRAWB~1\c\lib"'


Characteristics of this binary (from libperl): 
  Compile-time options: HAS_TIMES HAVE_INTERP_INTERN MULTIPLICITY
                        PERLIO_LAYERS PERL_DONT_CREATE_GVSV
                        PERL_HASH_FUNC_ONE_AT_A_TIME_HARD
                        PERL_IMPLICIT_CONTEXT PERL_IMPLICIT_SYS
                        PERL_MALLOC_WRAP PERL_NEW_COPY_ON_WRITE
                        PERL_PRESERVE_IVUV USE_64_BIT_INT USE_ITHREADS
                        USE_LARGE_FILES USE_LOCALE USE_LOCALE_COLLATE
                        USE_LOCALE_CTYPE USE_LOCALE_NUMERIC USE_PERLIO
                        USE_PERL_ATOF
  Built under MSWin32
  Compiled at May 30 2014 23:29:27
  %ENV:
    PERL5_CPANPLUS_IS_RUNNING="3164"
    PERL5_CPAN_IS_RUNNING="3164"
    PERL5_CPAN_IS_RUNNING_IN_RECURSION="3976,3164"
    PERL_CR_SMOKER_CURRENT="SQL-Interpolate-0.32"
    PERL_EXTUTILS_AUTOINSTALL="--defaultdeps"
    PERL_MM_USE_DEFAULT="1"
  @INC:
    C:/Strawberry/perl/site/lib/MSWin32-x86-multi-thread-64int
    C:/Strawberry/perl/site/lib
    C:/Strawberry/perl/vendor/lib
    C:/Strawberry/perl/lib
    .