[[Perl]]

*プログラム [#i5d771b2]
 use POSIX qw(strftime);
 my $today = strftime "%Y%m%d", localtime;
 print $today;

トップ   編集 差分 履歴 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS