use POSIX 'strftime';
■ このスレッドは過去ログ倉庫に格納されています
0005名無しさん＠お腹いっぱい。
02/01/04 12:08ID:???今後質問は専用スレでしてください。
#!perl
use POSIX qw(strftime);
print strftime "%Y %m %d\n", localtime(time + 60 * 60 * 24 * 7);
__END__
■ このスレッドは過去ログ倉庫に格納されています
今後質問は専用スレでしてください。
#!perl
use POSIX qw(strftime);
print strftime "%Y %m %d\n", localtime(time + 60 * 60 * 24 * 7);
__END__