Zeichensatzproblem?
  Home FAQ Contact Sign in
de.comp.lang.perl.misc only
 
Advanced search
POPULAR GROUPS

more...

de.comp.lang.perl.misc Profile…
 Up
Zeichensatzproblem?         


Author: A. Nimbrecht
Date: Dec 4, 2006 08:34

Hallo NG!

Ich habe einige CSV-Dateien zu bearbeiten und habe mir dafür
Tie::Handle::CSV aus dem CPAN herausgesucht. Bisher bin ich am
grundlegenden Herumexperimentieren:

In der Test-Datenbank stehen folgende Einträge:

"Datum";"Name";"Betrag"
04.12.06;"A. Säger";163,01
05.12.05;"Peter A. Mustermann";300,50

Ausgelesen wird das mit abgleich.pl:

#!/usr/bin/perl
use strict;
use warnings;

use Tie::Handle::CSV;

my $csv_fh = Tie::Handle::CSV->new('test.csv', header => 1, sep_char => ';')

my $first_line = <$csv_fh>;
print $first_line ."\n";
print $first_line->{'Betrag'} . "\n";

Das gibt aus:
Show full article (1.05Kb)
2 Comments
Re: Zeichensatzproblem?         


Author: Slaven Rezic
Date: Dec 4, 2006 13:18

"A. Nimbrecht" writes:
> Hallo NG!
>
> Ich habe einige CSV-Dateien zu bearbeiten und habe mir dafür
> Tie::Handle::CSV aus dem CPAN herausgesucht. Bisher bin ich am
> grundlegenden Herumexperimentieren:
>
> In der Test-Datenbank...
Show full article (1.55Kb)
1 Comment
Re: Zeichensatzproblem?         


Author: A. Nimbrecht
Date: Dec 4, 2006 15:05

Slaven Rezic schrieb:
> Wenn Tie::Handle::CSV auf Text::CSV_XS basiert, dann musst du noch
> binary=>1 oder so setzen. Genaueres liefert die Text::CSV-Manpage.

Basiert drauf. Das schaue ich mir dann direkt mal morgen früh an. Danke.
no comments