
   %n_days = ('January', 31, 'February', 28, 'March',     31,
              'April',   30, 'May',      31, 'June',      30,
              'July',    31, 'August',   31, 'September', 30,
              'October', 31, 'November', 30, 'December',  31);



   @fruit = ('apple', 'red',
             'banana', 'yellow',
             'kiwi' , 'brown');
   %hash = @fruit;

   # keys   are $fruit[0], $fruit[2], $fruit[4], ...
   # values are $fruit[1], $fruit[3], $fruit[5], ...


   @array = %n_days;

   # keys   are $array[0], $array[2], $array[4], ...
   # values are $array[1], $array[3], $array[5], ...

