七行プログラミング

[399 nobodyさん 2006/02/19(日) 19:16:08 ID:YpSh6qb6]

昔作った今月のカレンダー表示スクリプト。

($$,$:,$;,$=)=(localtime)[3..6];printf"%2d%s",$_,++$=%7?$":$/for(print($;+
1900,'/',$:+1,"/$$\n",$"x(($=-=$$-1)%7*3))..28+($:-1?3-$:%7%2:!($;%4)))