日付の計算

5 ：名無しさん＠お腹いっぱい。 ：2001/06/22(金) 13:59

perl だったら、こんなかんじ。

my @a = localtime(time-24*60*60);
printf "%s/%s/%s\n",$a[5]+1900,$a[4]+1,$a[3];

read.cgi ver5.26+ (01/10/21-)