map in map (Allgemeines zu Perl)

[thread]14620[/thread]

map in map

Leser: 21

Articles: hide open all | hide show old branches

+5 replies

roooot

2010-02-09 17:18

User since
2008-03-03
276 Artikel
BenutzerIn
[default_avatar]

Hi,

ich erstelle für CPAN:

HTML::Template ein Array für ein TMPL_LOOP.

Dazu erstelle ich ein Array mittels map. In diesem map Block soll nun nochmals ein Array mit map erstellt werden. Folgenden Code habe ich dazu probiert

Code (perl): (dl )

    my @news_w_details = +map {
        
        my %links   = %{$_->{'links'}};
        {
            NEWS_TITLE  => $_->{'title'},
            NEWS_TEXT   => $_->{'text'},
            
            NEWS_LINKS  => +map {
                
                NEWS_LINKS_LINK => $links{$_},
                NEWS_LINKS_TEXT => $_
                
            } keys %links
        }
        
    } @$gdn;

Allerdings funktioniert das so leider nicht :( Er gibt mir einen Syntax Error bei "} keys" aus.

Daten:

Code (perl): (dl )

$gdn = [
         {
           'link' => 'mapadelic-woho',
           'u_name' => 'chris',
           'uid' => 1,
           'created_time' => '2010-02-09 17:08:08',
           'text' => "Google ist \x{fc}berall, ab jetzt auch hier in der Galerie. Wers nicht mag, dem steht es frei, Google mithilfe einer Einstellung im Usercenter wieder von der Seite zu verbannen,",
           'id' => '001',
           'title' => 'mapadelic, woho',
           'links' => {
                        'Google Maps' => 'http://www.google.de/maps',
                        'Google Maps API' => 'http://code.google.com/intl/de-DE/apis/maps/'
                      }
         }
       ];

Danke für Hilfe

Viele Grüße :)

+4 replies

2010-02-09 17:24

User since
2003-08-04
12208 Artikel
Admin1

wenn NEWS_LINKS wiederum eine hashref erhalten soll, musst du sowas schreiben:

Code (perl): (dl )

NEWS_LINKS  => { map {
    (
        NEWS_LINKS_LINK => $links{$_},
        NEWS_LINKS_TEXT => $_,
    )
} keys %links }

also innen die runden klammern und ganz aussen nochmal geschweifte klammern.

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem

+3 replies

roooot

2010-02-09 17:35

User since
2008-03-03
276 Artikel
BenutzerIn
[default_avatar]

NEWS_LINKS soll eine arrayref werden, inder dann die hashrefs eingebettet sind. Bei deiner Empfehlung werden ja alle Links bis auf den Letzten verworfen.

Beispiel wie es aussehen soll:

Code (perl): (dl )

@news_w_details = (
                    {
                      'NEWS_LINKS' => [
                          {
                                        'NEWS_LINKS_TEXT' => 'Google Maps',
                                        'NEWS_LINKS_LINK' => 'http://www.google.com/maps'
                          },
                          {
                                        'NEWS_LINKS_TEXT' => 'Google Maps API',
                                        'NEWS_LINKS_LINK' => 'http://code.google.com/intl/de-DE/apis/maps/'
                          }
                      ],
                      'NEWS_TEXT' => "Google ist \x{fc}berall, ab jetzt auch hier in der Galerie. Wers nicht mag, dem steht es frei, Google mithilfe einer Einstellung im Usercenter wieder von der Seite zu verbannen,",
                      'NEWS_TITLE' => 'mapadelic, woho'
                    }
                  );

Last edited: 2010-02-09 17:37:41 +0100 (CET)

Viele Grüße :)

+2 replies
pq

2010-02-09 17:37
User since
2003-08-04
12208 Artikel
Admin1
dann halt so:
Code (perl): (dl )

1 2 3 4 5 6

NEWS_LINKS => [ map { +{ NEWS_LINKS_LINK => $links{$_}, NEWS_LINKS_TEXT => $_, } } keys %links ]
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
- roooot
  
  2010-02-09 17:38
  
  User since
  2008-03-03
  276 Artikel
  BenutzerIn
  
  Alles klar, super das tuts. Danke Tina.
  Viele Grüße :)

View all threads created 2010-02-09 17:18.