Go to English page

ViaThinkSoft CodeLib

Dieser Artikel befindet sich in der Kategorie:
CodeLib → Programmierhilfen → Perl

CodeLib Perl: MySQL-Vorlage
#!/usr/bin/perl

use DBI;

my $dsn = 'DBI:mysql:datenbankname:localhost';
my $db_user_name = '...';
my $db_password = '...';
my $dbh = DBI->connect($dsn, $db_user_name, $db_password);

my $sth = $dbh->prepare("SELECT ...");
$sth->execute;

my @Daten;
while (@Daten = $sth->fetchrow_array())
{
  print $Daten[0];
}

$dbh->disconnect();

exit;
Daniel Marschall
ViaThinkSoft Mitbegründer
Autor: Daniel Marschall
Datum: 2. Oktober 2008
Gelesen: 21.241 Mal