view release on metacpan or  search on metacpan

t/r454_testdata  view on Meta::CPAN

# $Id$

# This structure contains the expected results for various tests.
# See 01_sanity.t for a good example of how it is used.
#
# The data has been compiled by looking at all available 4-5-4 calendars
# on the NRF website.  Please update this data as new ones become available
# over the years.

%r454_data = (
  2001 => {
    r454_year => 2001,
    r454_start => '2001-02-04T00:00:00',
    r454_end => '2002-02-02T23:59:59',
    is_r454_leap_year => 0,
    periods => {
      1 => {
        r454_period => 1,
        r454_period_weeks => 4,
        r454_period_start => '2001-02-04T00:00:00',
        r454_period_end => '2001-03-03T23:59:59',
        r454_period_publish => '2001-03-08T00:00:00',
        r454_year => 2001,
      },
      2 => {
        r454_period => 2,
        r454_period_weeks => 5,
        r454_period_start => '2001-03-04T00:00:00',
        r454_period_end => '2001-04-07T23:59:59',
        r454_period_publish => '2001-04-12T00:00:00',
        r454_year => 2001,
      },
      3 => {
        r454_period => 3,
        r454_period_weeks => 4,
        r454_period_start => '2001-04-08T00:00:00',
        r454_period_end => '2001-05-05T23:59:59',
        r454_period_publish => '2001-05-10T00:00:00',
        r454_year => 2001,
      },
      4 => {
        r454_period => 4,
        r454_period_weeks => 4,
        r454_period_start => '2001-05-06T00:00:00',
        r454_period_end => '2001-06-02T23:59:59',
        r454_period_publish => '2001-06-07T00:00:00',
        r454_year => 2001,
      },
      5 => {
        r454_period => 5,
        r454_period_weeks => 5,
        r454_period_start => '2001-06-03T00:00:00',
        r454_period_end => '2001-07-07T23:59:59',
        r454_period_publish => '2001-07-12T00:00:00',
        r454_year => 2001,
      },
      6 => {
        r454_period => 6,
        r454_period_weeks => 4,
        r454_period_start => '2001-07-08T00:00:00',
        r454_period_end => '2001-08-04T23:59:59',
        r454_period_publish => '2001-08-09T00:00:00',
        r454_year => 2001,
      },
      7 => {
        r454_period => 7,