I'd DTRT: split on comma, and compare with eq.

Eeek! Compare with eq? So, you really don't want to know whether "1.234e-5" is numerically the same as ".00001234"? Or, for that matter, "1", "1.0", and "1.00" should all be different?

Oh, and should this list: "1.0, 2.0" be considered different than "1.0,2.0" (because you are splitting on commas and not removing space?)

I suspect you just misspoke there with the eq comment.

The way I'd approach this would be to split on /\s*,\s*/ and use numerical comparisons. I'd allow spaces in input because if they weren't, that would probably be the most common input error and it's pretty cheap to avoid—be liberal in what you accept and conservative in what you emit, and all that. The caveats to this approach are that you are limited in precision to what your perl provides and the input format is rigid (even with optional spaces.)

-sauoq
"My two cents aren't worth a dime.";

In reply to Re^5: Checking for occurrence in comma separated string by sauoq
in thread Checking for occurrence in comma separated string by Delusional

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.