return-Wert von Subfunktionen

[opi]

Hallo,

sub foo {
  my %hash_to_return;
  if(open(FILE, "</datei")) {
    # tu was mit den Daten
  }
  else {
    $hash_to_return{'error'} = "Irgendeine Fehlermeldung";
  }
  return %hash_to_return;
}

Und der Aufruf:

my %conf = foo();
if(exists $conf{'error'}) {
  print "Fehler: $conf{'error'}";
  exit;
}

Aber das ist wie so oft Geschmackssache :-)

Ich bin immer wieder überrascht, wieviel Hilfe man hier bekommt! Dankeschön! Diese Lösung ist echt genial! Warum bin ich da selber nicht drauf gekommen? :-)

Dankeschön!

Greez,
opi