for ($m=1; $m<=12; $m++)#Make an array of months
        {
            $months[$m] = $m;
        }
        
        foreach $months(@months)
        {