Re: script heading

[hiseldl]

in reply to script heading

If you want to add a $VERSION variable to your script or package you could use something like this:

use vars qw($VERSION);

$VERSION = sprintf "%d.%03d", q$Revision: 1.12 $ =~ /(\d+)\.(\d+)/;

When you check this out with RCS, the string between q$ $ will get updated with the RCS version, and the regexp will update your $VERSION variable.

HTH

--
hiseldl
What time is it? It's Camel Time!