FAQ

การเปลี่ยนเวลาใน scripts ให้ตรงกับเวลาในประเทศและทั่วโลก Perl Scripts
ผู้เขียน ChooNoi

---

ขั้นแรกเลยนะครับเมื่อคุณเขียน โปรแกรมมา 1 ตัว แต่ server นั้นอยู่เมืองนอก คิดแล้วคิดอีก ทำยังไงดี เวลาถึงจะตรงกับเวลาในประเทศเรา ไม่ยากแล้วครับ ต่อไปนี้เมื่อคุณเขียนโปรแกรมขึ้นมา 1 ตัวให้คุณนำ script นี้ ไปใส่ไว้ที่โปรแกรมของคุณเพื่อเป็นการตั้งเวลาใน script ของคุณนะครับ

 

$time_miss = 12;
($sec,$min,$hour,$day,$mon,$year,$wday,$yday,$isdst) = localtime(time+($time_miss*3600));
$mon++;
if ($mon<10) {$mon="0$mon";}
if ($day<10) {$day="0$day";}
if ($hour<10){$hour="0$hour";}
if ($min<10) {$min="0$min";}
if ($sec<10) {$sec="0$sec";}
$date = "$year/$mon/$day($hour\:$min)";
#$date = "$year/$mon/$day";

ความหมายของ ตัวแปลแต่ละตัวแปล $???
$time_miss คือ ผลต่างของเวลา หากเป็น 0 นั้นคือ เวลาปกติของ server ที่คุณใช้

$date คือ การรวมค่าตัวแปลต่างๆ เช่น วัน เดือน ปี มาไว้ในที่เดียวกันและให้นำมาแสดง

ตั้วอย่าง หากคุณต้องการให้แสดงผล

print "$date";
หรือ ให้เขียนวันแวลานี้ งลไปที่ไฟลล์
pring FILE"$date";

คิดว่าเพื่อนๆคงนำไปประยุกต์ ใช้ได้ตลอดไปนะครับ :)