Thread Bearbeiten von Hash werten: Stell ich mich zu doof an ?? (13 answers)
Opened by Patrick at 2004-01-22 14:22

Patrick
 2004-01-22 14:22
#79363 #79363
User since
2004-01-07
56 Artikel
BenutzerIn
[default_avatar]
Ich versuche verzweifelt auf ein bestimmtes Feld in einem Hash zuzugreifen und es auszulesen bzw. später zu ändern.

Aber es glingt mir ums verrecken nicht!

Jetzt bitte ich Euch um Hilfe!

So funktioniert die Ausgabe
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
# Jetzt wieder ausgeben!
my $key;
# Fuer alle Keywords
  for $key (@{$params{keywords}})
  {
# erst die freien Kommentare, falls vorhanden
     if (exists $params{$key}{precomments})
     {
        print "# ", $_, "\n" for @{$params{$key}{precomments}};
     }
  }
# dann die einzelnen Schluessel und Werte
  print "$key = ";
  my @vals = ();
  foreach my $val (@{$params{$key}{values}})
  {
     my $str = $val;
     if (exists $params{$key}{comments}{$val})
     {
        $str .= "\t# " . join " \\\n\t\t\t# ",
        @{$params{$key}{comments}{$val}};
     }
     push @vals, $str;
  }
#   print join " \\\n\t\t", @vals;
#   print "\n";


Ich versuche es nun so!

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
my $key;   
  print "$key = ";   #  zeile 181
  my @vals = ();
  foreach my $val (@{$params{$key}{values}})   #  Zeile 183
  {
#   my $str = $val;
     if ($params{$key} == "GENLIST")
     {
        $genlist = $params{$key}{values}[0];
     }
  }


ich bekomme aber ständig folgende Meldung:

Quote
Use of uninitialized value in concatenation (.) or string at Test.pl line 181.
= Use of uninitialized value in hash element at Test.pl line 183.
Use of uninitialized value in hash element at Test.pl line 183.


Was mach ich falsch
Mfg
Paddy

Perl ist göttlich, die Kunst besteht darin Perl anwenden zu können.

View full thread Bearbeiten von Hash werten: Stell ich mich zu doof an ??