From: "Jeff 'japhy' Pinyan" <[EMAIL PROTECTED]>
> On Jul 15, Jeff 'japhy' Pinyan said:
>
> >On Jul 15, Jenda Krynicky said:
> >
> >>> (better question) is there a better way to achieve the same
> >>> result?
> >>
> >> my @crap = map{ s/\.\w+$//; $_ } glob( '*.pl *.pgp');
> >
> >I'm so funny.
> >
> > my @crap = grep s/\.\w+$//, glob("*.pl *.pgp");
>
> And here's a better regex:
>
> s/\.(pl|pgp)$//
While we are at it. This
s/\.p(?:l|gp)$//
would be even better.
Jenda
=========== [EMAIL PROTECTED] == http://Jenda.Krynicky.cz ==========
There is a reason for living. There must be. I've seen it somewhere.
It's just that in the mess on my table ... and in my brain
I can't find it.
--- me
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
