my $struct = {
    fruit  => [qw( apple pear )],
    type    => [qw( farmed organic )],
    period  => {
      20050824 => {
        to  => ['new york', 'london', ],
      },
      20050825 => {
        to  => ['auckland', ],
      },
    }
  };