my %config = (
    tag_addr => [
        "addr:housenumber", "addr:housename", "addr:street",
        "addr:postcode", "addr:full"
    ],
);

my @key_list = qw/addr:housenumber addr:name addr:street/;

for my $key_name (@key_list) {
    if( grep{ $key_name eq $_ } @{$config{tag_addr}} ) {
        print $key_name." -> gefiltert\n";
    }
}