$VERSION = sprintf("%d.%02d", q$Revision: 1.5 $ =~ /: (\d+)\.(\d+)/); [download]
In reply to cvs revision extraction regex by chicks