one of these days I might even submit something useful. but for now, it's just another japh. this one prints more than 4 chars though.. 
              #!/perl
         undef$/;m/\\2o/;&                     open;sub
                    undef                     {s;(\d{60})
                    ;$1\n                   \n;xg; s;(\d{4})
                    ;\t\t$1                \n;gx;    m;\\8a;
                    ;s;\\2i;               ;;s;0;    ;g;s;1
                    ;****;gx;              s;\\1m\\1g\\1b;#\s
         \\1f        ;;}                  while       ($x=~m/
          \\(\d)(\w)/xg)                 {$_.=          substr
            ((unpack                   "B*",$2           ),4,4)x
              $1;}&

  
         undef;;;s;\\2o\;               \\5i\\2o        \\5i\\1n
         ;;;       foreach               (split          /\n/){
        print       ;print               "\n";m;         \\2o;;
        select       undef                ,undef,          undef
        ,0.05;      }sub                   open{s;\\4i\\1o;;;open
        $_,$0;$x=<$_>;                      s;\\1n          \\6h
        \\7i;;;close                        $_;$_            ="";
        }s;\\2o                               \\xo           \\a0
        \\6i;                                 exit           \\oo;
        ;;s;                                   undef           ///
        end;                                   \\\\            ///;
        ;;;

[download]

Should have formatted it nicer, but .. I got other things to do :)
feel free to hack it up & comment..

In reply to one more japh by gollem

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.