or download this
Scalar value @start_date_array[0] better written as $start_date_array[
+0] at a.pl line 12.
Scalar value @today_date_array[0] better written as $today_date_array[
+0] at a.pl line 12.
...
Scalar value @today_date_array[1] better written as $today_date_array[
+1] at a.pl line 14.
Scalar value @end_date_array[2] better written as $end_date_array[2] a
+t a.pl line 14.
Scalar value @today_date_array[2] better written as $today_date_array[
+2] at a.pl line 14.