Diff for dead/test/version.pl between version 1.1 and 1.2
| version 1.1, 2004/04/23 19:05:27 |
version 1.2, 2004/04/23 19:15:48 |
|
|
| # 2004-04-23 - created |
# 2004-04-23 - created |
| # |
# |
| |
|
| # $Platon$ |
# $Platon: dead/test/version.pl,v 1.1 2004/04/23 19:05:27 rajo Exp $ |
| |
|
| use strict; |
use strict; |
| |
|
| my $VERSION = sprintf("%d.%02d", q$Revision$ =~ /(\d+)\.(\d+)/); |
use vars qw ( $VERSION ); |
| |
|
| |
$VERSION = sprintf("%d.%02d", q$Revision$ =~ /(\d+)\.(\d+)/); |
| |
|
| print "version.pl version $VERSION\n"; |
print "version.pl version $VERSION\n"; |
| |
|
Platon Group <platon@platon.org> http://platon.org/
|
|