Hopefully this one won't break at the end of the month:

perl -MDate::Calc=:all -e'$|++;while(){$x=1993;$t=time;($y,$m,$d)=Loca
+ltime($t);$dd=Delta_Days($x,9,1,$y,$m,$d);$_=localtime$t;s/^(\S+\s)\S
++\s\S+(\s\S+\s)\S+$/${1}Sep $dd$2$x/;print"\r$_\t";sleep 1}'
[download]