X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=ext%2FEncode%2Fbin%2Fucmlint;h=bc0ebf58120d99f174cfc802c114ad9e4bb31281;hb=7237418a8f516d6002de239a7ae175380a62b3c8;hp=99a74d0d6aad0a02fca6551ca708aa5db0157605;hpb=bc2a472ee2496e18323688445a703595a998e3a4;p=p5sagit%2Fp5-mst-13.2.git diff --git a/ext/Encode/bin/ucmlint b/ext/Encode/bin/ucmlint index 99a74d0..bc0ebf5 100644 --- a/ext/Encode/bin/ucmlint +++ b/ext/Encode/bin/ucmlint @@ -1,10 +1,10 @@ #!/usr/local/bin/perl # -# $Id: ucmlint,v 0.2 2002/04/22 02:45:50 dankogai Exp $ +# $Id: ucmlint,v 2.0 2004/05/16 20:55:16 dankogai Exp $ # use strict; -our $VERSION = do { my @r = (q$Revision: 0.2 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r }; +our $VERSION = do { my @r = (q$Revision: 2.0 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r }; use Getopt::Std; our %Opt;