This is much more than I needed to know. Thanx for all the wonderful suggestions. I wish it was Friday.
> -----Original Message----- > From: Jeff 'japhy' Pinyan [mailto:[EMAIL PROTECTED]] > Sent: Monday, July 15, 2002 3:38 PM > To: Jenda Krynicky > Cc: Beginners (E-mail) > Subject: RE: Any difference in this? > > > 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)$// > > or > > s/\.\w{2,3}$// > > No reason not to be as specific as possible. > > -- > Jeff "japhy" Pinyan [EMAIL PROTECTED] http://www.pobox.com/~japhy/ RPI Acacia brother #734 http://www.perlmonks.org/ http://www.cpan.org/ ** Look for "Regular Expressions in Perl" published by Manning, in 2002 ** <stu> what does y/// stand for? <tenderpuss> why, yansliterate of course. [ I'm looking for programming work. If you like my work, let me know. ] -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] ---------------------------------------------------------------------------- -------------------- The views and opinions expressed in this email message are the sender's own, and do not necessarily represent the views and opinions of Summit Systems Inc. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]