記事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/ |
解決しました。お騒がせしました。