Thread Bei Abfrage des Rückgabewerts aus einer Subroutine gibts Fehler... (23 answers)
Opened by Brenner at 2009-01-22 12:26

Brenner
 2009-01-22 17:06
#118261 #118261
User since
2009-01-13
87 Artikel
BenutzerIn
[default_avatar]
Habs doch noch gelöst, einfach die { } nicht auskommentieren ;-)


Kannst du mir bitte die Subroutine erklären damit ich weiter komme.
Ich rufe im Hauptprogramm ja die Subroutine zum ausgeben auf, aber woher bekommt diese hier ihre Werte, ich habe doch keine mit übergeben an der Stelle sondern nur bei "new"?


Code (perl): (dl )
1
2
3
4
5
6
7
sub logfile_name {
  my ( $self, @args ) = @_;

  return $self->{logfile_name} if exists $self->{logfile_name};

  return undef;
}



edit:
Ok, dumm geschaut, also die Subroutine hat über "{logfile_name}" ihren Wert bekommen, ABER trotzdem, wie genau in dem String
Code (perl): (dl )
  return $self->{logfile_name} if exists $self->{logfile_name};


wird das gehandhabt. Der erste "self" Aufruf, woher bekommt er die Werte und hbeduetet der zweite "self" Aufruf das er die Defaultwerte die unter "new" stehen nimmt falls beim ersten "self" keine vorhanden sind?

View full thread Bei Abfrage des Rückgabewerts aus einer Subroutine gibts Fehler...