Frage zu Datenstruktur - #133818 (Allgemeines zu Perl)

2010-03-01 15:03

User since
2003-08-04
12208 Artikel
Admin1

wenn pro host jeweils alle zeilen in einem array gespeichert werden sollen, hättest du ein hash of arrays.

Code (perl): (dl )

my %hosts;
# iterieren über zeilen
# extrahieren von host, user, tp, ...
push @{ $hosts{ $host } }, {
    user => $user,
    tp   => $tp,
};

wenn auch noch nach weiteren keys gesammelt werden soll:

Code (perl): (dl )

1
2
3

# iterieren über zeilen
# extrahieren von host, user, tp, ...
$hosts{ $host }->{ $user }->{ $tp } = ...;

ausgeben kannst du die datenstruktur zum debuggen erstmal so:

Code (perl): (dl )

1
2

use Data::Dumper;
print Dumper \%hosts;

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem