Hashkey finden (gelöst) - #169734 (Allgemeines zu Perl)

rosti

2013-08-24 11:38

User since
2011-03-19
3499 Artikel
BenutzerIn

map{} liefert Dir ein Array, hier schonmal ein Fehler im Kontext ;)

Wir füttern map{}'right side' mal nicht direkt mit dem Array sondern mit dem Array für die Indizies. Das sieht dann so aus:

Code (perl): (dl )

package main;

use strict;
use warnings;

my %test = (
    sup     => [
        {
            name            => 'Fooname',
            ident           => 'foo',
        },
        {
            name            => 'bardame',
            ident           => 'bar',
        },
    ],
);

my @match = map {$test{sup}[$_]{ident} eq 'bar' ? $test{sup}[$_]{name} : ''} (0.. scalar @{$test{sup}} - 1);
print "@match \n";

Das Array mit dem Ergebnis enthält 'bardame' als sichtbares Element. Es sind jedoch zwei Elemente in @match, guckstdu:

Code (perl): (dl )

1
2
3

my @match = map {$test{sup}[$_]{ident} eq 'bar' ? $test{sup}[$_]{name} : 'KA'}
    (0.. scalar @{$test{sup}} - 1);
print "@match \n"; # KA bardame

Last edited: 2013-08-24 11:42:01 +0200 (CEST)