[Date Prev][Date Next][Thread Prev][Thread Next] [Search] [Date Index] [Thread Index]

Re: [FWP] Elegant ways to pick up the RCS revision



On 2001-04-06 23:57:55, bernie@fantasyfarm.com wrote:
> 
> my $version = (split(/ /, '$Revision: $'))[1] ;

($VERSION) = q$Revision: 1.01 $ =~ /(\d+\.\d+)/;

- ams

==== Want to unsubscribe from Fun With Perl?  Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
====   unsubscribe