[過去ログ]
Perlについての質問箱 64箱目 (1002レス)
Perlについての質問箱 64箱目 http://mevius.5ch.net/test/read.cgi/tech/1548981877/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
レス栞
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
803: デフォルトの名無しさん [sage] 2020/11/28(土) 18:31:31.18 ID:1bDz9VeK 「数で得る」というのがよく解らないが、timelocal()とlocaltime()を使えば、 多分、やりたいことができると思う。 http://mevius.5ch.net/test/read.cgi/tech/1548981877/803
821: デフォルトの名無しさん [sage] 2020/12/06(日) 11:42:16.72 ID:BlX3SIQO >>803 だが、>>802 の質問は>>803 で終わったと思ったのだが、不親切だった? 例えば2019年12月1日から365日後の日付は、次のようにすれば得られる。 use Time::Local; $year=2019;$mon=12;$mday=1;$hours=12;$min=0;$sec=0; $intvl=365; $basetime = timelocal($sec, $min, $hours, $mday, $mon-1, $year-1900); $basetime += $intvl*24*60*60; ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) =localtime($basetime); $mon+=1;$year+=1900; print STDERR "$year.$mon.$mday\n"; http://mevius.5ch.net/test/read.cgi/tech/1548981877/821
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.057s