MOON
Server: Apache/2.2.21 (Unix) mod_ssl/2.2.21 OpenSSL/0.9.8e-fips-rhel5 mod_auth_passthrough/2.1 mod_bwlimited/1.4
System: Linux vps.panamaemb.org.sg 3.10.0-1160.80.1.vz7.191.4 #1 SMP Thu Dec 15 20:31:06 MSK 2022 x86_64
User: panama (500)
PHP: 5.2.17
Disabled: NONE
Upload Files
File: //installd/perl588installer/ExtUtils-MakeMaker-6.50/t/revision.t
#!/usr/bin/perl -w

BEGIN {
    if( $ENV{PERL_CORE} ) {
        chdir 't' if -d 't';
        @INC = ('../lib', 'lib');
    }
    else {
        unshift @INC, 't/lib';
    }
}

use Test::More tests => 4;

BEGIN { 
    use_ok 'ExtUtils::MakeMaker'; 
    use_ok 'ExtUtils::MM_VMS';
}

# Why 1?  Because a common mistake is for the regex to run in scalar context
# thus getting the count of captured elements (1) rather than the value of $1
cmp_ok $ExtUtils::MakeMaker::Revision, '>', 1;
cmp_ok $ExtUtils::MM_VMS::Revision,    '>', 1;