[nzlug] non-RCS file check

Johann Schoonees j.schoonees at irl.cri.nz
Wed Aug 2 09:09:02 NZST 2006


Martin D Kealey wrote:
> On Mon, 31 Jul 2006, Martin D Kealey wrote:
> 
>>>Yes that does it!  Not being a Perl speaker, how would I modify it to handle
>>>(.*),v archives and their associated working files which find themselves in
>>>the same directory?
>>
>>   s</(?:RCS/)?(.*),v><$1> ? $R{$_}++ : push @F, $_ ;
> 
> 
> Done it again.
> 
>    s</(?:RCS/)?(.*),v></$1> ? $R{$_}++ : push @F, $_ ;

What's interesting - to me anyway - is how much faster the perl runs 
compared to the bash solutions to the same problem.

Johann

This message has been scanned for viruses and dangerous content by MailScanner, and is believed to be clean.





More information about the NZLUG mailing list