Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer

Re: using a string or file in qw

by jasonk (Parson)
on Jan 22, 2009 at 18:47 UTC ( #738262=note: print w/replies, xml ) Need Help??

in reply to using a string or file in qw

my @words = split( ' ', $words ); print join ' ', grep { ! $stopwords->{ $_ } } @words;

Then I suggest you read a good book, such as "Learning Perl"
We're not surrounded, we're in a target-rich environment!

Replies are listed 'Best First'.
Re^2: using a string or file in qw
by Bloodnok (Vicar) on Jan 22, 2009 at 19:52 UTC
    ... or even:
    . . print join ' ', grep ! $stopwords->{ $_ }, split( ' ', $words ); . .
    - assuming @words isn't required later...

    A user level that continues to overstate my experience :-))

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://738262]
[choroba]: Re: Modern Perl 4th Edition Perl Cookbook is a very bad cookbook, I wasn't able to finish any dish and the resulting meals were disgusting.

How do I use this? | Other CB clients
Other Users?
Others about the Monastery: (4)
As of 2017-11-17 21:26 GMT
Find Nodes?
    Voting Booth?
    In order to be able to say "I know Perl", you must have:

    Results (272 votes). Check out past polls.