Thread 2 input files --> 1 output file (2 answers)
Opened by Gast at 2008-02-26 20:20

renee
 2008-02-26 20:53
#106375 #106375
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Da es CSV-Dateien sind, würde ich zu CPAN:Text::CSV raten oder - wenn man die Dateien als "Datenbank" behandeln will - zu CPAN:DBD::CSV.

Wenn Du sicher sein kannst, dass in den Werten selbst kein Zeilenumbruch und kein ';' vorkommt, dann kannst Du so etwas machen:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

#!/usr/bin/perl

use strict;
use warnings;

my $file = '/test.csv';

my @array;

open my $fh, '<', $file or die $!;
while( my $line = <$fh> ){
    chomp $line;
    push @array, [split /;/, $line]; # schiebe die einzelnen Spalten in das Array
}
close $fh;

# gib Spalte 3 aus Zeile 4 aus
print $array[3]->[2];


Die sogenannten "mehrdimensionalen Arrays" werden in Perl mit Referenzen gemacht. Dazu ist perlreftut lesenswert...
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/

View full thread 2 input files --> 1 output file