t/10_self_check.t


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

use strict;
use warnings;
use Test::More tests => 2;
use FindBin;
use Parse::PMFile;
use Config;

for (0..1) {
  no warnings 'once';
  local $Parse::PMFile::FORK = $_;
  my $p = Parse::PMFile->new;
  my $dir = $ENV{AUTOPKGTEST_TMP} ? $Config{vendorlib} : "$FindBin::Bin/../lib";
  my $pkg = $p->parse("$dir/Parse/PMFile.pm");

  is $pkg->{'Parse::PMFile'}{version} => $Parse::PMFile::VERSION, "version of Parse::PMFile matches \$Parse::PMFile::VERSION";
}