Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?

Re: How to get only files ending with a ,<word>

by Paladin (Priest)
on Jan 11, 2006 at 22:24 UTC ( #522580=note: print w/replies, xml ) Need Help??

in reply to How to get only files ending with a ,<word>

You'll have to be a bit more specific on what is not working. It seems to work just fine here:
[~/tmp]$ touch foo,bar [~/tmp]$ touch baz [~/tmp]$ touch foo,baz [~/tmp]$ touch a b c [~/tmp]$ perl . foo,bar foo,baz

Replies are listed 'Best First'.
Re^2: How to get only files ending with a ,<word>
by perlNinny (Beadle) on Jan 11, 2006 at 22:32 UTC
    Yes, you are right. What I want is this: I want the list to contain only the portion after the ,. So, using your example, I want to see bar bas and each a separate element in the list. THANKS for the help!
      Then something like:
      my @comma_extensions = map { /,(\w+)$/ ? $1 : () } @files;
      will produce what you want.

      Jeff japhy Pinyan, P.L., P.M., P.O.D, X.S.: Perl, regex, and perl hacker
      How can we ever be the sold short or the cheated, we who for every service have long ago been overpaid? ~~ Meister Eckhart

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://522580]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (7)
As of 2018-06-19 18:31 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (114 votes). Check out past polls.