Thread Anonymer Hash in Array (4 answers)
Opened by piccard at 2009-01-12 17:48

piccard
 2009-01-12 17:48
#117881 #117881
User since
2009-01-12
3 Artikel
BenutzerIn
[default_avatar]
Hallo,
ich bin auf folgendes Problem gestoßen. Ich greppe ein Datei, suche mir hierbei die interessanten Zeilen raus und stecke diese momentan in ein Hash, welches ich dann in ein Array stecken will:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

 #!/usr/bin/perl -w
 #
 # Get infos of the dsmaccnt-file 

 use strict;
 use Data::Dumper;

 # some vars
 my $filename = "aaa";
 my @transferInfos = qw/wort1 wort2 wort3 wort4 wort5 .../;
 my @allTransfers;
 my %nodeTransfer;
 
 # read file
 open (IN,"<$filename") || die $!;
 while (<IN>){
          if ( grep {/\b$node\b/i} $_) {
                  @nodeTransfer{@transferInfos} = (split /,/, $_)[3,4,5,12,14,16,18,19];
          }
 }
  
 print Dumper(\%nodeTransfer);


Wie kann ich es anstellen, dass die split-operation das ganz in ein anonymes Hash steckt, welches dann mittels push direkt in ein Array geht???

Vielen Dank i.v. :-)

View full thread Anonymer Hash in Array