Mentions légales du service

Skip to content
Snippets Groups Projects
Commit 82a65841 authored by Vincent Danjean's avatar Vincent Danjean
Browse files

Cleanup version handling

parent d8938831
No related branches found
No related tags found
No related merge requests found
......@@ -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);
......
......@@ -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();
......
......@@ -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
......
......@@ -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"})) {
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment