Re^3: 3 packages 1 uniform version

I do this in all my packages: Create a VERSION.pm containing the following code:

package Foo::VERSION;
$VERSION=(qw$Revision: 1.119 $)[1];
[download]

Which is updated by cvs everytime I check the package in. In each subpackage I have the following line:

$VERSION = eval { require Foo::VERSION; do $INC{'Foo/VERSION.pm'}};
[download]

Must be all on one line if you want it interpreted by CPAN etc.

Comment on Re^3: 3 packages 1 uniform version Select or Download Code

Replies are listed 'Best First'.
Re^4: 3 packages 1 uniform version by polettix (Vicar) on Feb 14, 2008 at 18:56 UTC
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?	[reply] [d/l] [select]