print "Value: " . $_ . "\n"
    for
        map $hash_ref->{lc $_},
            grep exists $hash_ref->{lc $_},
                @vars;