# set the version for version checking
               $VERSION     = 1.00;
               # if using RCS/CVS, this may be preferred
               $VERSION = sprintf "%d.%03d", q$Revision: 1.1 $ =~ /(\d+)/g;