for my $array_ref (@weeks_arr){
   print join "," ,@{$array_ref};
}