while(<>){print if (m/foo/i)}works quite well. It does what I expected it to do. It reads lines from STDIN and prints them if they match.
print while(<>) also does what I expect it to do, it prints every line from STDIN.
print if(m/foo/i) also does what I thought it would. It prints $_ if it matches foo.
print if(m/foo/i) while(<DICT>); doesn't compile. Instead, I get an error message. C:\>perl -e "use diagnostics; print if (m/foo/i) while(<>)"
syntax error at -e line 1, near ") while"
Execution of -e aborted due to compilation errors (#1)
Uncaught exception from user code:
syntax error at -e line 1, near ") while"
Execution of -e aborted due to compilation errors.
. It makes sense to me, the way I've written it. Maybe I'm asking perl to do to much magic with the if infront of the while. I've tried to find the answer in perlman:perlsyn and the camel (2nd ed.) but haven't had any luck. Maybe I'm not looking in the right place. Can anyone please shed some light?
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.
|