use Data::Dumper;

$form->{days} = [
          '2011-02-26',
          '2011-02-25',
          '2011-02-24',
          '2011-02-23',
          '2011-02-22',
          '2011-02-21',
          '2011-02-20',
        ];

##</code><code>##

	[
	  '2011-03-01',
	  '2011-02-28',
          '2011-02-27'
          '2011-02-26',
          '2011-02-25',
          '2011-02-24',
          '2011-02-23',
          '2011-02-22',
          '2011-02-21',
          '2011-02-20',
        ];