this is an embarrassingly basic question, but here goes. There are a lot of messages in here related to the subject of line endings, but its very simplicity (and ubiquity) mean that it's hard to find an authoritative answer, and I'm hoping that the combined wisdom and bickering of the monastery can provide me with a standard best way.

in short, I want to match on line endings regardless of the combination of newlines, carriage returns and what have you in the text entered or uploaded. For example, the most common case is that I want to insert an html paragraph break at each occurrence of two or more returns.

the code I'm using at the moment is this (extracted without the bits that prettify output):

sub paraphrase {
    my $text = shift;
    $text =~ s/\r/\n/gs;
    $text =~ s/(?:\n\s*){2,}/<\/p>\n<p>/gs;
    return "<p>$text</p>";
}

[download]

Which seems to work, but I put it in a very long time ago and now it feels clunky and brittle. Can anyone set my mind at rest?

In reply to line endings by thpfft

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.