Главная страница


ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Michael Poliakov                     2:5020/400     31 Jul 2000  19:31:06
 To : All
 Subject : Re: date, time
 -------------------------------------------------------------------------------- 
 
 On 28 Jul 2000 15:10:52 +0400, Dmitry Ochnev <ochnev@alpha.tula.net> wrote:
 
 >> >Как получить и вывести текущую дату и время ?
 
 Может, в FAQ занести?
 
 print time_stamp(time);
 
 sub time_stamp {
   my ($time) = @_;
   my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) =
    localtime($time);
   $mon++;
   $year += 1900;
   my $stamp = sprintf("%02d.%02d.%04d %02d:%02d:%02d",
    $mday, $mon, $year, $hour, $min, $sec);
 }
 
 Michael Poliakov
 --- ifmail v.2.15dev5
  * Origin: Nizhniny Novgorod Information Networks (2:5020/400)
 
 

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

 Тема:    Автор:    Дата:  
 date, time   Dmitry Ochnev   28 Jul 2000 11:53:18 
 Re: date, time   Michael Poliakov   28 Jul 2000 14:06:57 
 Re: date, time   Dmitry Ochnev   28 Jul 2000 15:10:52 
 Re: date, time   Roman Drobov   28 Jul 2000 15:36:06 
 date, time   Sanyo Titaev   28 Jul 2000 22:09:40 
 Re: date, time   vitus@ice.ru   28 Jul 2000 17:47:33 
 Re: date, time   Serge Shikov   28 Jul 2000 23:13:18 
 Re: date, time   Michael Poliakov   31 Jul 2000 19:31:06 
 date, time   Sly Golovanov   07 Aug 2000 17:43:20 
 date, time   Alexander Voytsekhovsky   02 Aug 2000 14:54:47 
 date, time   Maxim Sharenkov   04 Aug 2000 02:56:50 
 date, time   Sanyo Titaev   28 Jul 2000 19:14:38 
 date, time   Eugeniy Muran\'   28 Jul 2000 13:17:44 
Архивное /ru.perl/208032d2397e.html, оценка 1 из 5, голосов 10
Яндекс.Метрика
Valid HTML 4.01 Transitional