Вот более оптимальный метод (на 300%)

mashi 19.11.2005 20:39 / 19.11.2005 20:41

@days_per_month[month;year]
^if($month%2 !|| $month\8){
  $result(31)
}{
  ^if($month == 2){
    ^if(^is_leap_year[$year]){$result(29)}{$result(28)}
  }{
    $result(30)
  }
}

Замеры показали экономию памяти и времени примерно на 300%.

---