| 記事No | ： 10152 |
| 投稿日 | ： 2012/02/23(Thu) 10:50:51 |
| タイトル | ： YY-BOARDに秒を表示（改造） |
| ID情報 | ： zzzman |
| 投稿者 | ： zzzman |
| URL | ： http://www.yahoo.co.jp/ |
YY-BOARDを使わせていただいております。
以前のバージョンでは、投稿日時に秒まで記録されていたと思うのですが、現在は分までのようです。
そこで、秒を表示するように改造したいと思っています。
regist.cgiの下記の部分に「$sec」を追加してみたのですが、サーバエラーで動きませんでした。
どのようなすればいいか教えてくださると助かります。
よろしくお願いします。
※LAN内で使用しているため、URLはダミーです
#-----------------------------------------------------------
# 時間取得
#-----------------------------------------------------------
sub get_time {
$ENV{TZ} = "JST-9";
my $time = time;
my ($sec,$min,$hour,$mday,$mon,$year,$wday) = (localtime($time))[1..6];
my @week = qw|Sun Mon Tue Wed Thu Fri Sat|;
# 日時のフォーマット
my $date = sprintf("%04d/%02d/%02d(%s) %02d:%02d:%02d",
$year+1900,$mon+1,$mday,$week[$wday],$hour,$min,$sec);
return ($date, $time);
}
| 記事No | ： 10162 |
| 投稿日 | ： 2012/02/23(Thu) 16:11:29 |
| タイトル | ： Re: YY-BOARDに秒を表示（改造） |
| ID情報 | ： zzzman |
| 投稿者 | ： zzzman |
| URL | ： http://www.yahoo.co.jp/ |
解決しました。お騒がせしました。