The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more

#!/usr/bin/perl -w
use strict;
BEGIN {
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;