Mindful Monks,

this code snippet: 

$delimiter = "|";
$line = "|45.55.186.846|asdf|24_12:20:19|ab|2004|18467|409|19|us|22348
+|i|cnor|f|55p|2";
$line =~ s/$delimiter/\,/g;
print "$line\n";

[download]
produces the output:

,|,4,5,.,5,5,.,1,8,6,.,8,4,6,|,a,s,d,f,|,2,4,_,1,2,:,2,0,:,1,9,|,a,b,|,2,0,0,4,|,1,8,4,6,7,|,4,0,9,|,1,9,|,u,s,|,2,2,3,4,8,|,i,|,c,n,o,r,|,f,|,5,5,p,|,2,

whereas I was looking for:

,45.55.186.846,asdf,24_12:20:19,ab,2004,18467,409,19,us,22348,i,cnor,f,55p,2

Something obvious undoubtedly.
Thanks.

Forget that fear of gravity,
Get a little savagery in your life.

In reply to Using variable in substitute regex producing odd results by punch_card_don

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.