A short Perl script that rather crudely simulates a baseball player's season.
AB Hits 2B 3B HR BB K AVG Joe Batter 500 138 23 4 10 23 54 .276 simulated Joe Batter 482 147 20 4 12 41 71 .305 historical