@time = localtime;

$time = sprintf ("%04d/%02d/%02d %02d:%02d:%02d",
	$time[5] + 1900,$time[4] + 1,$time[3],$time[2],$time[1],$time[0]);

------------------------------------------------------------------------------
cookie での expires (GMTで出力)

（例）2時間後を指定の場合
@gmt = split (/ /, gmtime(time + 2 * 60 * 60));
$gmtime = "$gmt[0], $gmt[2]-$gmt[1]-$gmt[4] $gmt[3] GMT";