use POSIX;formline$'.(" @>"x7x/ /.$/)x((($#a=(strftime(("%d%w %b $` ")x5,$',$`+72)=~/. /+$&-$`)%7-1)+$`)/7+2),@a,1..$`for<>;print$\x01
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page