Whilst enjoying cholesterol rich victuals with fellow Perl coders, one boasted how he provided obfuscated solutions to new Perl coder's inquiries.

The case in point was providing the mean number from numbers, on sepearate lines of a file. Alledgedly, he produced a one-liner 40 characters long, using internal variables.

I enjoy obfuscation to learn more aspects of Perl but disapprove of making Perl code daunting to new coders. I set forth to best 40 characters. This is my attempt:

open I,'o';map{$a+=$_}<I>;print $a/$.

38 characters and yet too readable! Is there a more obscure and brief solution? I have faith that my fellow monks have knowledge to impart.


--
Brother Frankus.

In reply to Ars gratia artis. by frankus

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.