use 
                         strict
                        ;s++303 
         3320          130101301
        0130101       30130130101
       3010  10      101010101012           0101
       0101    0    1010  101  333        ++s$3$2
       01$g;        my$m= q&2 B15A       3F1F1F16
        A3C1D      15D5A1F9A17A1A7     A21D1  E6
         E4F1B    13B1C4B    1E5F6F    2F9F2   F
          6C1C5A7A1D9D1D7A1A5D12F1C1  2C1A 
           5D11C3A11B1B5F4F1E15F1F4C1A5D5A
            1E1E1F1A1B1A1B1A1B1A1B1A1B1A
             1C5C1F6F5D1D1D1D1D1D1D1D1D1
              D1D1D1D1F5A1C7C21E1E9E17A
               2A10C1&;@_=grep/[210]/,
               split//;$m=~s/\s//g;my@m
               =split/\D/,$m;s$.|\s$$g
               ;for my$i(0..$#_){ $_
                .= $_[$i] x $m[$i];}
                 s/$/a33y01a44ow55n/;
                  +y+0-5+ H\nple+d;
                   y=x=z=?split/s+/,
                   map++$$,@_:print;
                      #By CubicSpline

[download]

In reply to Boo! by CubicSpline

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.