#!perl -pl use POSIX strftime;/ .* /;$_=strftime"%w",0,0,0,$',$&-1,$`-1900
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page