Thread Elegante Syntax für Hash-Def (11 answers)
Opened by bianca at 2010-03-27 12:41

bianca
 2010-03-27 13:31
#135356 #135356
User since
2009-09-13
7016 Artikel
BenutzerIn

user image
2010-03-27T12:22:38 renee
Dann ist aber nicht mehr "Unübersichtlichkeit" der Grund...

Ja, sorry, hatte ich unterschlagen, mein Fehler.

Hab jetzt einiges eingebaut aber wie bekomme ich $/ noch elegant in das split rein?
split /$// geht nicht und split /"$/"/ geht auch nicht?

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

#!/usr/bin/perl -w
use strict;
use warnings;
use Data::Dumper;
my %tabelle;
my $trenner = $/;
foreach my $line (split /$trenner/,<<KONSTANTE
foo                             N
bar                             A
KONSTANTE
) {
        my $counter = (keys %{$tabelle{head}}) + 1;
        ($tabelle{head}->{$counter},$tabelle{typ}->{$counter}) = split /\t+/,$line;
}
print Dumper(%tabelle);
10 print "Hallo"
20 goto 10

View full thread Elegante Syntax für Hash-Def