[Comm] perl
Alexey Morsov
=?iso-8859-1?q?samurai_=CE=C1_ricom=2Eru?=
Чт Июн 2 11:02:58 MSD 2005
Aleksander N. Gorohovski wrote:
>>($sec, $min, $hour, $day, $mon, $year, $wday, $yday, $isdst)
>> = localtime($_[0]);
>>
>> if (length($day) == 1) { $day ='0'.$day; }
>> if (length($mon) == 1) { $mon ='0'.++$mon; }
>> if (length($min) == 1) { $min ='0'.$min; }
>> if (length($sec) == 1) { $sec ='0'.$sec; }
>> else { $mon++; }
>
>
> Sorry,
>
> $mon++;
> for($day,$mon,$min,$sec){ $_="0$_" if length($_) == 1 }
ну как там было... there more then one way to do the same thing или как
то так ;)
Писалось в свое время в попыхах так что - что выросло то выросло.
--
Всего наилучшего,
Системный Администратор ЗАО "ИК "РИКОМ-ТРАСТ"
Алексей Морсов
ICQ: 196766290
Jabber: Samurai на jabber.pibhe.com
http://www.ricom.ru
http://www.fondmarket.ru
Подробная информация о списке рассылки community