0.5.11

Author: dgl

client-perl.cgi

@@ -24,11 +24,6 @@ use vars qw($VERSION $PREFIX);
 # change this if needed
 $PREFIX = "/tmp/cgiirc-";
 
-($VERSION =
-'$Name:  $ 0_5_CVS $Id$'
-) =~ s/^.*?(\d\S+) .*$/$1/;
-$VERSION =~ s/_/./g;
-
 use Socket;
 use Symbol;
 $|++;

irc.cgi

@@ -26,7 +26,7 @@ use lib qw/modules interfaces/;
 no warnings 'uninitialized';
 
 ($VERSION =
-'$Name:  $ 0.5-g $Id$'
+'0.5.11 $Id$'
 ) =~ s/^.*?(\d\S+) .*?([0-9a-f]{4}).*/$1 . (index($1, "g") > 0 ? "$2" : "")/e;
 
 require 'parse.pl';

nph-irc.cgi

@@ -32,7 +32,7 @@ use vars qw(
    );
 
 ($VERSION =
-'$Name:  $ 0.5-g $Id$'
+'0.5..11 $Id$'
 ) =~ s/^.*?(\d\S+) .*?([0-9a-f]{4}).*/$1 . (index($1, "g") > 0 ? "$2" : "")/e;
 
 use Socket;