ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Slava Gorbanev                       2:5057/19.20   28 Jun 2001  04:09:24
 To : "Denis Roshchin"
 Subject : Re: ip, time
 -------------------------------------------------------------------------------- 
 

 
 On Wed, 27 Jun 01 23:58:17 +0500 Denis Roshchin wrote:
 
  >> time, localtime.  точнее так -- localtime time :)
  DR> Чтобы получить дату, я делаю такую феню:
 
  DR> use Time::localtime;
 
  DR> #Current Date
  DR> $tm = localtime;
  DR> $cyear = $tm->year+1900;
  DR> $cmonth = $tm->mon+1;
  DR> $cday = $tm->mday;
  DR> $datesql = $cyear . "-" . $cmonth . "-" . $cday;
  DR> $date = $cday . "." . $cmonth . "." . $cyear;
 
  DR> Hо я читал документацию по этому-же модулю, но там не слова про
  DR> время...
 
 ой, мама... perldoc -f localtime.  а Time::localtime -- это просто
 поименный доступ к тому, что возвращает стандартный localtime.
 
 >> по поводу ip -- расскажи, зачем он тебе нужен, и я расскажу, где ты не
 >> прав.  ну а в общем случае -- Sys::Hostname и gethostbyname.
  DR> gethostbyname - возвращает мне HOST, если у меня уже есть
  DR> имя сервера :)).
 
 ха, я думал тебе нужен ip, привязанный к машине, на которой выполняется
 скрипт.
 
  DR> User заходит на страничку и надо закидывать в базу его IP.
 
 вообще-то, в случае CGI его берут из $ENV{REMOTE_ADDR}
 
  DR> sys:hostname похоже то, что надо.
 
  DR>     use Sys::Hostname;
  DR>     $host = hostname;
 
 это будет имя хоста, на котором запущен скрипт.
 
 -- 
 RnD[.]                               [ http://dot.formoza.ru/ ]
 
 GCS d- s+:- a-- C++++ UBL+++ P+++ L+++ E(++) W+(++) N++@+ o? K-
 w O M- V PS+ PE Y PGP- t- 5 X R- tv b+ DI-- D++ G++ e- h! r y**
 --- tin/1.5.7-20010105 ("Laetitia") (UNIX) (Linux/2.2.16-3 (i586))
  * Origin: just leave me alone (2:5057/19.20)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор