/usr/local/CPAN/Lingua-EN-Words2Nums/Makefile.PL

• package main
  • getversion
• EOF

#!/usr/bin/perl
use ExtUtils::MakeMaker;

WriteMakefile(
	NAME      => 'Lingua::EN::Words2Nums',
	VERSION   => getversion(),
	$] < 5.005 ? () : (
		AUTHOR => 'Joey Hess <joey@kitenet.net>',
		ABSTRACT_FROM => 'Words2Nums.pm',
	)
);

# The version is pulled from the debian changelog, to avoid having to keep
# two copies synced.
sub getversion {
	open(DCH, "debian/changelog") or die "debian/changelog: $!";
	$_=<DCH>;
	my ($vers) = m/\((.+)\)/;
	die "no version" unless length $vers;
	return $vers;
}