среда, 4 мая 2011 г.

perl как всегда

Как обычно, когда что то подвело (как php+doctrine) из предыдущего поста, perl выручит.

Перлу коннект  к mssql нипочем.


use DBI;
my ($host,$port,$database,$user,$pass) = (...);
my $dbh = DBI -> сonnect("DBI:Sybase:server=$host:$port;database=$database",$user,$pass);
my $sth = $dbh -> prepare('select 1');
$sth -> execute();

Вот и пригодится , чувствую , сейчас мне mojolious.