Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

Re^5: How to write a program to read stdin or command line?

by BrowserUk (Pope)
on Oct 03, 2007 at 11:00 UTC ( #642374=note: print w/replies, xml ) Need Help??


in reply to Re^4: How to write a program to read stdin or command line?
in thread How to write a program to read stdin or command line?

With -p, whilst you can conditionally undef $_ to avoid it being printed; if you are also using -l, you will get unwanted blank lines:

C:\test>type junk.txt 1 2 3 4 5 C:\test>perl -nle"$_ & 1 and print" junk.txt 1 3 5 C:\test>perl -ple"$_ & 1 or undef $_ and next" junk.txt 1 3 5

And in fact the next in your example serves no purpose:

C:\test>perl -ple"$_ & 1 or undef $_" junk.txt 1 3 5

Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.

Replies are listed 'Best First'.
Re^6: How to write a program to read stdin or command line?
by ikegami (Pope) on Oct 03, 2007 at 13:36 UTC
    Yeah, I was confused, sorry.