[nzlug] non-RCS file check

[Nevyn]

On 8/2/06, Johann Schoonees <j.schoonees at irl.cri.nz> wrote:
>
> 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 would be because perl is designed for pattern parsing in mind
whereas bash is designed with completely different goals.