Opened by Ronnie at 2003-11-23 22:15
User since
2003-11-26
97 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-11-26
97 Artikel
BenutzerIn
Ich muss zugeben Closures ist ein Konzept in Perl das ich auch fuer voellig geisteskrank und (mittlerweile) mehr als fluessig halte. Ich zitiere mal das Beispiel aus dem Kamel-Buch fuer diejenigen die es nicht haben:
Also nur ein umstaendlicher Weg sich Variablen zu bauen die man nicht mehr veraendern kann. Scheint ein Ueberbleibsel von frueheren Perl-Versionen zu sein als es "use constant" noch nicht gab.
Sonst sehe ich keinen rechten Sinn darin. Kann mir irgendjemand eine sinnvolle Anwendung dieses Variablengewurschtels von Closures nennen? Das Counter-Beispiel von Strat ist zwar ganz nett, aber wenn man auf Datenkapselung wert legt wuerde man das doch eher als OOP-Modul bauen, oder nicht?
Edit renee: quote- durch code-Tags ersetzt\n\n
<!--EDIT|renee|1070285545-->
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
sub newprint {
my $x = shift;
return sub {
my $y = shift;
print "$x, $y!\n";
}
}
$h = newprint('Howdy');
$g = newprint('Greetings');
# ...
&$h('world'); # Ausgabe: Howdy, world!
&$g('earthlings'); # Ausgabe: Greetings, earthlings!Also nur ein umstaendlicher Weg sich Variablen zu bauen die man nicht mehr veraendern kann. Scheint ein Ueberbleibsel von frueheren Perl-Versionen zu sein als es "use constant" noch nicht gab.
Sonst sehe ich keinen rechten Sinn darin. Kann mir irgendjemand eine sinnvolle Anwendung dieses Variablengewurschtels von Closures nennen? Das Counter-Beispiel von Strat ist zwar ganz nett, aber wenn man auf Datenkapselung wert legt wuerde man das doch eher als OOP-Modul bauen, oder nicht?
Edit renee: quote- durch code-Tags ersetzt\n\n
<!--EDIT|renee|1070285545-->