I am not really a huge baseball fan, but I do live in the Bay Area, and I was sad that even though Barry Bonds broke Big Mac's home run record, he didn't get as much press in the sports pages. So, this obfu is a chronicle of Barry's season...

my @actions=("hits","smashes",  "bashes","whacks",
"pops","drives");my @places=    ("outta the park",         
"into the bleachers","over" .         " the fence"
                ,"into the"            ." stands")
                 ;srand;for     ($i=1;$i<=73;$i++)
            {$hit_index         =rand@actions;$hit 
           =$actions            [$hit_index];my $a     
          ;$place_i                          =rand 
          @places;                           $park
          =$places               [$place_i]; print   
          "Barry ".              "Bonds ". "$hit ";      
           print                 "number $i ";print
           "$park"               ."!!!\n";}my $end

[download]

In reply to Barry Bonds Home Run Counter by mr_dont

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.