if ((($year % 4) = 0)  && (($year % 100) != 0)) { 
    $feb += 1; 
} #leap year
elsif (($year % 400) = 0) { 
    $feb +=1; 
} #leap century