Thread Missing Value
(8 answers)
Opened by lukastonner at 2010-07-07 11:58
Eine Variante:
Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 #! /usr/bin/perl use strict; use warnings; my @data = qw( 1;foo;bar 2;;fuzz 3;bar;foo ); for my $line ( @data ) { # splitte zeile; leere Elemente werden mit '-999.999' aufgefüllt my ( $eins, $zwo, $drei ) = map { length $_ ? $_ : '-999.999' } split m{;}, $line; print "$eins, $zwo, $drei\n"; } __END__ meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen! |