One could rewrite the example script as
# figure out what day we have by subtraction
j = (Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec)
c = ()
mon = ()
for (i in 31 $feb 31 30 31 30 31 31 30 31 30 31)
if (~ $#mon 0) {
c = ($c 1)
if (expr $i '>' $d >/dev/null)
mon = $#c
if not
d = `{expr $d - $i}
}The lack of break may require recasting the form of a script.
