\def\engtoday{\ifcase\month\or
  January\or February\or March\or April\or May\or June\or
  July\or August\or September\or October\or November\or December\fi
  \space\number\day, \number\year}

\def\kortoday{\number\year ³â \number\month ¿ù \number\day ÀÏ}