diff --git a/ALTree/Chi2.pm b/ALTree/Chi2.pm
index 858b150e4dbdf6d4ba38d534533d79b45d36bb75..40b130afc6a46b910296a0ed380238943d3f6b46 100644
--- a/ALTree/Chi2.pm
+++ b/ALTree/Chi2.pm
@@ -10,8 +10,8 @@ BEGIN {
     # set the version for version checking
     #$VERSION     = 1.00;
     # if using RCS/CVS, this may be preferred
-    $VERSION = do { my @r = (q$Revision$ =~ /\d+/g); 
-		    sprintf "%d."."%02d" x $#r, @r }; # must be all one line, for MakeMaker
+    #$VERSION = do { my @r = (q$Revision$ =~ /\d+/g); 
+    #		    sprintf "%d."."%02d" x $#r, @r }; # must be all one line, for MakeMaker
     
     @ISA         = qw(Exporter);
     @EXPORT      = qw(NON_SIGNIFICATIF SIGNIFICATIF &chi2_significatif &definition_p_chi2 &reech_chi2);
diff --git a/ALTree/Import.pm b/ALTree/Import.pm
index a64a44436fa51fbe68569b5a4510175b7dce659e..1485749e34fcf34f1f4d21b0f4bf83147d669a19 100644
--- a/ALTree/Import.pm
+++ b/ALTree/Import.pm
@@ -18,8 +18,8 @@ BEGIN {
     # set the version for version checking
     #$VERSION     = 1.00;
     # if using RCS/CVS, this may be preferred
-    $VERSION = do { my @r = (q$Revision$ =~ /\d+/g); 
-		    sprintf "%d."."%02d" x $#r, @r }; # must be all one line, for MakeMaker
+    #$VERSION = do { my @r = (q$Revision$ =~ /\d+/g); 
+    #		    sprintf "%d."."%02d" x $#r, @r }; # must be all one line, for MakeMaker
     
     @ISA         = qw(Exporter);
     @EXPORT      = qw();
diff --git a/Makefile.PL b/Makefile.PL
index 8e8e3c527c96152ae37750ca2652852093dabbec..72286b2253dbd594aac9757923a03f0e1bd9c639 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -6,7 +6,8 @@ WriteMakefile(
     NAME              => 'altree',
     PMLIBDIRS         => [ 'ALTree' ],
     DIR               => [ 'CUtils' ],
-    VERSION	      => '1.2.1',
+    VERSION_FROM      => 'progs/altree',
+    depend	      => { Makefile => '$(VERSION_FROM)' },
     LICENSE           => 'perl',
     PREREQ_PM         => {}, # e.g., Module::Name => 1.1
     ($] >= 5.005 ?     ## Add these new keywords supported since 5.005
diff --git a/progs/altree b/progs/altree
index 834100e3513f4ce108821832f5a132e88d8b4c28..2ef1b54834e618e66e318f51e98f1835a19bfd16 100755
--- a/progs/altree
+++ b/progs/altree
@@ -10,8 +10,7 @@ use Data::Dumper;
 
 srand(654321);
 
-our $VERSION;
-$VERSION = sprintf "0.%03d", q$Revision: 433 $ =~ /(\d+)/g;
+use version; our $VERSION = qv(1.2.1);
 
 # Positionner la variable PERL5LIB si besoin
 
@@ -1195,9 +1194,7 @@ sub manage_options
 		) or pod2usage(2);
     if (defined($options{"version"})) {
 	print $0, " version ", $VERSION, "\n";
-	print "(CUtils version ", $ALTree::CUtils::VERSION, 
-	"; chi2.pm version ", $ALTree::Chi2::VERSION,
-	"; Perl version ", $], ")\n";
+	print "(Perl version ", $], ")\n";
 	exit 0;
     }
     if (defined($options{"short-help"})) {