if Abfrage auf Hash value (gelöst) - #154798 (Allgemeines zu Perl)

suresh

2011-12-13 12:39

User since
2010-10-12
109 Artikel
BenutzerIn
[default_avatar]

So sieht der Code im Moment aus:

Code (perl): (dl )

unless ( defined $information->{project} ) {
    my ($source) = map { $_->{project} } $information;
    return $source;
  }
  else {
    print STDERR "Es ist ein Fehler aufgetreten!\n";
    exit 1;
  }

Jetzt hab ich allerdings das Problem, dass die Fehlermeldung trotzdem kommt selbst wenn ein String angegeben ist, die Referenz also nicht auf einen leeren Wert zeigt.