Предыдущая тема :: Следующая тема |
Автор |
Сообщение |
chatl Гость
|
Добавлено: Сб Май 31 2003 17:41 Заголовок сообщения: opredelnie daty v perl |
|
|
Narod, pishu gostevuhu cgishnuju. Vse rabotajet krome daty. Net li takoi funkcii v perl kotoraja krasivo daty savit otpravki messagi, datu po tallinnskomu vremeni? Ja hostjus' na kakom-to amerikanskom servere i vremja na nem golimoe otstajet na neskol'ko mesjacev, da i chasy ne te. Ja probyval localtime i druguju erundu s grinvechem, no vse ne to. mozhet est' chto-nibud' vrode "date" v JS? |
|
Вернуться к началу |
|
|
sh
Зарегистрирован: 11.03.2002 Сообщения: 121
|
Добавлено: Вс Июн 01 2003 18:46 Заголовок сообщения: Re: opredelnie daty v perl |
|
|
$a = scalar(localtime()); print $a; |
|
Вернуться к началу |
|
|
Lucky
Зарегистрирован: 15.05.2003 Сообщения: 6 Откуда: Каменск
|
Добавлено: Вс Июн 01 2003 19:06 Заголовок сообщения: Re: opredelnie daty v perl |
|
|
Меняй смещение.
#!/usr/bin/perl
$timeoffset = 0; # Time offset - change it's value if your server time # conflicts with your local time.
# You may insert 'undef' instead of unused variables when you upload the # script to web server. ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isds t) = localtime(time + (3600*$timeoffset));
# Hours, minutes, seconds, day and month should be in two-digit format. $hour = "0$hour" if ($hour $mday.$mon.$year $hour:$min:$sec\n";
# Hint: you may call this script by SSI using this tag: #
А лучше смени хостинг |
|
Вернуться к началу |
|
|
sh
Зарегистрирован: 11.03.2002 Сообщения: 121
|
Добавлено: Вс Июн 01 2003 19:08 Заголовок сообщения: Re: opredelnie daty v perl |
|
|
хотя сорри не дочитал коммент ... какой смысл брать время юзера ведь тогда бардак с датами будет, если хочешь чтоб было время как у тебя то возьми ты по гринвичу и вычти\добавь сколько надо, например($sec,$min,$hour,$mday,$mon,$year,$wday,$yday) = gmtime(time); $hour += 2; print "$hour:$min:$sec\n"; |
|
Вернуться к началу |
|
|
chatl Гость
|
Добавлено: Пн Июн 02 2003 03:06 Заголовок сообщения: Re: opredelnie daty v perl |
|
|
Spasibo, spasibo, no esli brat' vremja po grinvichu, to slishkom gemorroino vse schitat'. Tam naprimer $year ne pishetsja kak 2003, a idet kak 103 ot 1900-ogo goda vidimo. I tak so vsemi chislami. Tut problema, napimer, takaja. Server pokazyvajet 01.04, a seichas 01.05 na samom dele. Dalaja $mon+1, riskjuesh' ves' janvar' prozhit' v 13-om mesjace. I sekundami, i chislami mesjaca, kotory postojanno menjajutsja, takaja ze erunda. Ja vse taki vzjal vrenja jusera. Bog s nim, u bol'shinstva chasy hodjat normal'no i bol'shinstvo userov (tochnee vse) opjat' zhe iz mojego vremennogo pojasa. Ja sdelal eshe odin parametr v forme, kotory neset datu poluchennuju iz javascript: date(). poka ochen' ne ploho smotritsja. |
|
Вернуться к началу |
|
|
|