http://qs321.pair.com?node_id=1082683


in reply to Re: High-speed Date Formatting
in thread *SOLVED* High-speed Date Formatting

The constants for BrowserUk are wrong. They should be: 
use constant MONTHS => { qw[
    Jan 0 Feb 31 Mar 59 Apr 90 May 120 Jun 151
    Jul 181 Aug 212 Sep 243 Oct 273 Nov 304 Dec 334
] };

[download]

In Section Seekers of Perl Wisdom