Thread Teil-Hash mit Grep auf Keys? (4 answers)
Opened by LanX- at 2008-10-23 04:59

LanX-
 2008-10-23 04:59
#115713 #115713
User since
2008-07-15
1000 Artikel
BenutzerIn

user image
Hi

vielleicht denke ich zu kompliziert, gibts ne elegantere Methode um ein Hash zu filtern?
gerne auch per use "Coremodul" ... konnte aber nix finden...

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

use Data::Dumper;

%hash=(
    a=>1,
    b=>2,
    c=>3,
    aa=>4,
);

@filterd_keys=grep {/a/} keys %hash;

@filterd_hash{@filterd_keys}= @hash{ @filterd_keys };

print Dumper \%filterd_hash;


Code: (dl )
1
2
3
4
$VAR1 = {
'a' => 1,
'aa' => 4
};

View full thread Teil-Hash mit Grep auf Keys?