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

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



>>>>> "Bernie" == Bernie Cosell <bernie@fantasyfarm.com> writes:

Bernie> I thought I saw [maybe on c.l.p.misc] a fairly cute/clever way to pick up 
Bernie> the RCS revision number...   I can't remember what it was, so I thought 
Bernie> I'd ask here.  what I use [as is typical for my code] is dull and 
Bernie> straightforward:

Bernie> my $version = (split(/ /, '$Revision: $'))[1] ;

Bernie> but surely there must be more fun/obscure ways to get that effect..:o)

$VERSION = (qw$Revision: 1.34 $ )[-1];

-- 
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!

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