or download this
#!/usr/bin/perl
my @data;
...
Tue-2,41,42,,44,45,46
Wed-1,51,52,53,54,55,56
Wed-2,61,62,63,64,65,66
or download this
May-1,May-2,May-3,May-.......,May-30
/dir/dir1/file1,3,34,,,,34,.......
...
/dir/dir1/dir2....
..up to 1000-2000 rows..