Sigh. :)

Steffen Nurpmeso wrote in
 <20220722231041.pjnox%stef...@sdaoden.eu>:
 ...

Or this:

  set v15-compat=y

  define imap_data_last_year {
     local set x y z=$1
     vput ! x date '+%d-%b-%Y'
     vput csop x trim $x
     # or '+%d %b %Y' above, then no $ifs games
     set ifs=-; eval vpospar set $x; unset ifs
     vput vexpr y - $3 1
     eval set $z=${1}-${2}-$y
  }

  call imap_data_last_year myvar

Well.  We need a lot more good stuff.

--steffen
|
|Der Kragenbaer,                The moon bear,
|der holt sich munter           he cheerfully and one by one
|einen nach dem anderen runter  wa.ks himself off
|(By Robert Gernhardt)

Reply via email to