Wednesday, April 13, 2011

How do I process an entire hash in perl

foreach my $key ( keys %hash ) {
my $value = $hash{$key}
}

foreach my $key ( sort keys %hash ) {
my $value = $hash{$key}
}

foreach my $key ( grep /^text:/, keys %hash ) {
my $value = $hash{$key}
}

while( my( $key, $value ) = each( %hash ) ) {
}

No comments: