8 марта 2011 г. 23:56 пользователь Олег Алексеенков <[email protected]>написал:

> Dmitry Karasik <[email protected]> писал(а) в своём письме Wed, 09 Mar
> 2011 01:36:31 +0300:
>
>
>  сознавайтесь, чье это? ;)
>>
>> http://thedailywtf.com/Articles/Classic-WTF-A-Date-of-Infamy.aspx
>>
>
> Да он совсем перла не знает! пыхер, или может быть сишник.
>
> Думаю любой из присутствующих тут начал бы так:
>
> #read date
> if (open(my $thedate, '-|', qx{date})) {
> ...


Реальные пацаны делают так:

my $date=$dbh->selectrow_arrayref("SELECT NOW()")->[0];

Как говорится, "There is more than one way to do it ugly".

-- 
Andrei Protasovitski
< andrei[dot]protasovitski[at]gmail[dot]com >
Diemen, Netherlands
-- 
Moscow.pm mailing list
[email protected] | http://moscow.pm.org

Ответить