Wie kann ich ermitteln, ob ein Perl-hash enthält eine Schlüssel-mapping-einen undefinierten Wert?

Muss ich feststellen, wenn ein Perl-hash hat einen bestimmten Schlüssel, aber Schlüssel zugeordnet werden undef Wert. Insbesondere die motivation für diese ist zu sehen wenn boolean-flags während der Verwendung getopt() mit einer hash-Referenz an Sie übergeben. Ich habe schon gesucht, sowohl diese Website und google, und exists() und defined() scheinen nicht anwendbar zu sein für die situation, sondern Sie sehen nur zu, wenn der Wert für einen bestimmten Schlüssel nicht definiert ist, wird Sie nicht überprüfen, wenn die hash-Funktion hat eigentlich die Taste. Wenn ich ein RTFM hier, bitte zeigen Sie mir das Handbuch erklärt, dass das.

InformationsquelleAutor Alex Marshall | 2010-01-23
  1. 26

    exists() und defined() scheint das nicht zu gelten für die situation, sondern Sie sehen nur zu, wenn der Wert für einen bestimmten Schlüssel nicht definiert ist, wird Sie nicht überprüfen, wenn die hash-Funktion hat eigentlich die Taste

    Falsch. Das ist in der Tat was defined() tut, aber exists() genau das tut, was Sie wollen:

    my %hash = (
    key1 => 'value',
    key2 => undef,
);

foreach my $key (qw(key1 key2 key3))
{
    print "\$hash{$key} exists: " . (exists $hash{$key} ? "yes" : "no") . "\n";
    print "\$hash{$key} is defined: " . (defined $hash{$key} ? "yes" : "no") . "\n";
}

    produziert:

    $hash{key1} vorhanden: ja 
$hash{key1} definiert ist: ja 
$hash{key2} vorhanden: ja 
$hash{key2} definiert ist: Nein 
$hash{key3} vorhanden: Nein 
$hash{key3} definiert ist: Nein

    Die Dokumentation für diese beiden Funktionen ist verfügbar auf der Befehl-Linie an perldoc -f defined und perldoc -f exists (oder Lesen Sie die Dokumentation für alle Methoden, bei perldoc perlfunc*). Die offizielle web-Dokumentation ist hier:

    *, Da Sie speziell erwähnt RTFM und Sie möglicherweise nicht bewusst sein, die Standorte der Perl-Dokumentation, lassen Sie mich auch darauf hinweisen, dass Sie können erhalten Sie einen vollständigen index aller perldocs bei perldoc perl oder bei http://perldoc.perl.org.

    InformationsquelleAutor Ether
  2. 11

    Wenn ich lese Ihre Frage richtig, ich denke, dass Sie verwirrt sind,existiert. Aus der Dokumentation:

    existiert EXPR

    Gegeben, ein Ausdruck, der angibt, eine
    hash-element oder array-element zurück
    true, wenn das angegebene element in der
    hash oder array je gegeben hat
    initialisiert, auch wenn der entsprechende
    Wert ist nicht definiert.

    Beispiel:

    use strict;
use warnings;

my %h = (
    foo => 1,
    bar => undef,
);

for my $k ( qw(foo bar baz) ){
    print $k, "\n" if exists $h{$k} and not defined $h{$k};
}
    InformationsquelleAutor FMc
  3. 6

    Kurze Antwort:

     if ( exists $hash{$key} and not defined $hash{$key} ) {
    ...
 }
    InformationsquelleAutor Adam Kennedy
Schreibe einen Kommentar