2 package Module::Install::Makefile::Version;
4 use Module::Install::Base;
5 @ISA = qw(Module::Install::Base);
11 sub determine_VERSION {
13 my @modules = glob('*.pm');
16 File::Find::find( sub {
17 push @modules, $File::Find::name =~ /\.pm\z/i;
23 ExtUtils::MM_Unix->parse_version($modules[0])
26 print STDERR $@ if $@;
28 } elsif ( my $file = "lib/" . $self->name . ".pm" ) {
31 ExtUtils::MM_Unix->parse_version($file)
36 $self->version or die << "END_MESSAGE";
37 Can't determine a VERSION for this distribution.
38 Please call the 'version' or 'version_from' function in Makefile.PL.