●使用例
・モバシフ my @t = localtime(); $t[5] += 1900; $t[4]++; my $now = sprintf( "%04d/%02d/%02d %02d:%02d:%02d", @t[5,4,3,2,1,0]);
●サイトhttp://cocohome.hp.infoseek.co.jp/perl_ref/localtime.html
タグ：
