All you basically need to do is 1) strip the comments and then 2) strip the newlines. You have to remove the comments otherwise everything after the first comment will be a comment when you remove the newlines. Finally wrap with perl -e 'code'.

Finding comments is somewhat harder than you may imagine as the humble pound sign can occur in many contexts. These are:

  1. ) In string context bare or within single or double quotes ' ` ``
  2. ) In string context within the q qq qx qw qr constructs
  3. ) As the string delimiter for the above constructs
  4. ) In literal context within regular expressions
  5. ) As the delimiter for regular expressions
  6. ) In $# context usually seen in for(0..$#array) construct but also $#
  7. ) And yes also as the comment token!

You will find a fairly reliable solution here that does 1 and 2 for you.

cheers

tachyon

s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print

In reply to Re: script display. Oneline <-> multiline by tachyon
in thread script display. Oneline <-> multiline by matth

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.