Thread Ergänzung zur Gruppenverarbeitung und neue Frage (4 answers)
Opened by Gast at 2003-11-11 18:41

Ronnie
 2003-11-11 19:12
#71236 #71236
User since
2003-08-14
2022 Artikel
BenutzerIn
[default_avatar]
[quote=Crian,11.11.2003, 17:55]Hättest Du meinen Ansatz genommen, so hättest Du zu jeder Tabelle ein Array mit den Spalten, und würdest mit scalar ARRAY die Anzahl der Elemente erhalten.[/quote]
Was spricht gegen: scalar(@{$daten->{$_}})

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
#!/usr/bin/perl

use warnings;
use strict;

my $daten;
my @tables = qw(Tabelle1.Spalte1 Tabelle1.Spalte2 Tabelle1.Spalte3
Tabelle2.Spalte1 Tabelle2.Spalte2 Tabelle2.Spalte3
Tabelle3.Spalte1);

for (@tables) {
my ($a, $b) = split(/\./, $_);
push @{$daten->{$a}}, $b;
}

for (keys (%$daten)) {
print "Groesse des Arrays für $_: ", scalar(@{$daten->{$_}}), "\n";
print $_,"\n";
print "--", $_, "\n" for (@{$daten->{$_}});
}

exit();


Allerdings habe ich den Eindruck das Markus Problem eher ein DBI Unkenntniss Problem ist, oder?

View full thread Ergänzung zur Gruppenverarbeitung und neue Frage