Commit | Line | Data |
---|---|---|
2977d345 | 1 | #!/usr/bin/perl -w |
2 | ||
3 | BEGIN { | |
b78fd716 | 4 | unshift @INC, 't/lib'; |
2977d345 | 5 | } |
6 | ||
7 | use Test::More tests => 4; | |
8 | ||
9 | BEGIN { | |
10 | use_ok 'ExtUtils::MakeMaker'; | |
11 | use_ok 'ExtUtils::MM_VMS'; | |
12 | } | |
13 | ||
58d32538 | 14 | # Why 1? Because a common mistake is for the regex to run in scalar context |
15 | # thus getting the count of captured elements (1) rather than the value of $1 | |
16 | cmp_ok $ExtUtils::MakeMaker::Revision, '>', 1; | |
17 | cmp_ok $ExtUtils::MM_VMS::Revision, '>', 1; |