X-Git-Url: https://git.jankratochvil.net/?p=www.jankratochvil.net.git;a=blobdiff_plain;f=Redirect.pl;h=327ef14bc562679b0b4754d1c61e650f760a115a;hp=6b51f62906bfdf00f3bdd9086465708de5edd898;hb=refs%2Fheads%2Fmodperl;hpb=eef48d2e46f78c25e0a1145cc2748bfb1d7c5fd7

diff --git a/Redirect.pl b/Redirect.pl
index 6b51f62..327ef14 100755
--- a/Redirect.pl
+++ b/Redirect.pl
@@ -20,9 +20,8 @@
 
 package Redirect;
 require 5.6.0;	# at least 'use warnings;' but we need some 5.6.0+ modules anyway
-use vars qw($VERSION $CVS_ID);
-$VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
-$CVS_ID=q$Id$;
+our $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
+our $CVS_ID=q$Id$;
 use strict;
 use warnings;