Perl & MySQL

[Lalaa]

Hi Leute,

ich habe mich gefragt, wie ich mich in Perl mit der MySQL-DB verbinden kann? Wäre echt dankbar für eure Hilfe!

Thx

Lalaa

[Straffi]

Moin Lalaa,

dafür gibts die DBI-Schnittstelle:

Code: Select all

use strict;
use DBI;

my $Server = 'localhost';
my $Database = 'Test';
my $Username = 'ich';
my $Password = 'geheim';

my $DBHandle = DBI->connect("dbi:mysql:$Database:$Server", $Username, $Password);

my $Query = "SELECT * FROM TabelleEins";
my $QueryHandle = $DBHandle->prepare($Query);
$QueryHandle->execute();

while (my $Row = $QueryHandle->fetchrow_arrayref)
{
 print join("\t", @Row),"\n";
}

$DBHandle->disconnect;


*winke winke* straffi

[Lalaa]

Danke Straffi,

es hat funktioniert!
An alle die versuchen mit Perl auf Mysql zuzugreifen. Es wird ein DBD-Modul benötigt. Im Forum hier zu Perl gibt es einen Thread "Perl & Mysql". Befolgt dort die komplizierte Version, denn nur diese funzt.

Gruss

Lalaa