I've got a regular expression that checks to see if a string contains a particular word (very basic of course), here it is:
$exclude = "middle_name pager zip";
if($exclude !~ m/pager/gi)
{
 #do its thing
}

[download]
Now by all reasonable thinking, the above expression should fail, after all $exclude contains the word pager. Unfortunately it passes quite nicely and does nasty things. However, if $exclude contains
"middle_name zip pager"
the test fails exactly as it should. The only difference (and I assume the important one), is that pager comes at the end of the list rather than in the middle. I just tried m/.?pager.?/ig and that didn't work either.

Does perl have some subtle spite against pagers that I'm not aware of? Or is there some blindingly obvious problem that I'm too retarted to notice?
Thanks

In reply to This is just wonky... by Sullust

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • 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:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.