Ist Hash in Array vorhanden? - #113642 (Allgemeines zu Perl)

Struppi

2008-08-18 14:17

User since
2006-02-17
628 Artikel
BenutzerIn

Was möchtest du den genau Wissen? Ob der Key existiert oder er einen bestimmten Wert hat?
Dein code weist allen Elementen den gleichen Wert zu.

Code (perl): (dl )

#!/usr/bin/perl
use strict; use warnings;
use Data::Dumper;

my @move;
push @move,{"123" => "foo"};
push @move,{"234" => "bar"};
push @move,{"345" => "joo"};

if (grep { $_ = {'234' => 'bier'} } @move) {
         print "vorhanden\n";
} else {
print "nicht vorhanden\n";
}

print Dumper \@move;

Ausgabe:

Code: (dl )

$VAR1 = [
          {
            '234' => 'bier'
          },
          {
            '234' => 'bier'
          },
          {
            '234' => 'bier'
          }
        ];