Author: sCALP Date: To: guilde Subject: Re: Perl ...
> Bonjour, >
> je suis à la recherche d'un exemple de programme assez propre en PERL qui se > connecte sur une base Mysql... Quelqu'un aurait-il ça dans ses tiroirs, ou
> une url ?
>
> Cordialement,
>
> Philippe B.
$max_id = $dbh->selectrow_array("SELECT MAX(id) FROM date");
$query = "CREATE TABLE team (j INT PRIMARY KEY NOT NULL DEFAULT 0,wu INT NOT
NULL DEFAULT 0";
$dbh->do($query);
$sth = $dbh->prepare("SELECT wu FROM team WHERE j=?");
for ($j=1; $j<=30; $j++) {
$sth->execute($j);
($wu) = $sth->fetchrow;
push(@{"stats".$i},$wu);
}
$sth->finish;