Thread Missing Value (8 answers)
Opened by lukastonner at 2010-07-07 11:58

Linuxer
 2010-07-07 14:42
#139645 #139645
User since
2006-01-27
3888 articles
HausmeisterIn

user image
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!

View full thread Missing Value