http://www.perlmonks.org?node_id=668005


in reply to Re^3: 3 packages 1 uniform version
in thread 3 packages 1 uniform version

I'd simplify as follows:
Package Foo::VERSION;
$VERSION = '$Revision: 1.119 $'; # or
$VERSION = q$Revision: 1.119 $;

[download]
and then
$VERSION = eval { require Foo::VERSION; $Foo::VERSION::VERSION };

[download]

Hey! Up to Dec 16, 2007 I was named frodo72, take note of the change! Flavio
perl -ple'$_=reverse' <<<ti.xittelop@oivalf

Io ho capito... ma tu che hai detto?

In Section Seekers of Perl Wisdom