CSV Datei mit CGI öffnen - #9053 (Perl/CGI)

renee

2006-12-06 23:26

User since
2003-08-04
14371 Artikel
ModeratorIn

Wenn Du dieses Skript im Verzeichnis mit der Datei Kunden (hat die bei Dir eigentlich eine Endung?) laufen lässt, sollte alles klappen (ist bei mir getestet):

Code: (dl )

#!/usr/bin/perl

use strict;
use warnings;
use DBI;
use FindBin ();

my $dbh = DBI->connect("DBI:CSV:f_dir=".$FindBin::Bin);
my $stmt = "SELECT * FROM Kunden";

my $sth = $dbh->prepare($stmt) or die $dbh->errstr();
$sth->execute() or die $dbh->errstr();

while(my @row = $sth->fetchrow_array()){
    print "@row\n";
}

Meine Umgebung:
* WinXP
* ActivePerl 5.8.8
* DBD::CSV 0.22 (perl -MDBD::CSV -e "print $DBD::CSV::VERSION")

Dieses Skript in der Konsole (resp. DOS-Box aufrufen)\n\n

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/

Antworten mit Zitat