Wow there have been several different responses to this
question, but not one has mentioned the operator that is
designed to do just what you ask, that is the
.. operator.
print if (/^Keyword$/../^\s*$/)||0 > 1 and /\S/;
OK, so what does this do. Well the .. operator will return
false until the LHS
is true. It then returns a true value,
this value will initially be 1 but will increment each time,
until the RHS
becomes true. But it will return true on the line where the
RHS is true, so we add the /\S/ check
to prevent the output of the last line.
The || 0 is there as for false
.. returns "",
which -w will complain about.
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.