Select Code to Download

print "\$ctime tzoffset:   ", $ctime->tzoffset, "\n";
print "\$halfago tzoffset: ", $halfago->tzoffset, "\n";
print "\$oldtime tzoffset: ", $oldtime->tzoffset, "\n";

$ctime tzoffset:   -25200
$halfago tzoffset: -25200
$oldtime tzoffset: 0