
MySQL og Perl
Det er muligt at etablere forbindelse til MySQL databasen fra et Perl-script ved hjælp af DBI modulet. Se eksemplet nedenfor.
#!/usr/bin/perl
#
# Eksempel på udtræk af data fra en MySQL database vha. DBI modulet.
################################################
use DBI;
$user = "brugernavn"; # Dit brugernavn
$host = "localhost"; # Den MySQL server der skal forbindes til.
$db = "database"; # Navnet på din database.
$pwd = "mitpassword"; # Dit password
# Først etablerer vi en forbindelse til databasen.
$dbh = DBI->connect( "DBI:mysql:$db:$host", $user, $pwd)
or die "Connecting : $DBI::errstr\n ";
# Nu definerer vi et udtræk fra tabellen "min_tabel".
$sql = "SELECT * FROM min_tabel";
# Nu udføres udtrækket.
$sth = $dbh->prepare($sql) or die "preparing: ",$dbh->errstr;
$sth->execute or die "executing: ", $dbh->errstr;
print "content-type: text/html\n\n";
# Nedenstående udskriver indholdet af kolonnen "min_kolonne".
while ($row = $sth->fetchrow_hashref)
{
print $row->{'min_kolonne'},'<BR>';
}
# Slut på eksemplet.
Kontakt os
Har du spørgsmål eller kommentarer er du meget velkommen til at kontakte os. Du kan finde kontaktoplysninger samt kontaktformular her.
|
 |

Warning: mysql_connect(): Access denied for user 'esidedk'@'localhost' (using password: YES) in /home/virtual/e-side.dk/public_html/nyheder.inc on line 5
Warning: mysql_select_db() expects parameter 2 to be resource, boolean given in /home/virtual/e-side.dk/public_html/nyheder.inc on line 6
Warning: mysql_fetch_array() expects parameter 1 to be resource, boolean given in /home/virtual/e-side.dk/public_html/nyheder.inc on line 9
|