Opened by bloonix at 2006-05-23 14:33
User since
2004-01-29
828 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2004-01-29
828 Artikel
BenutzerIn
Bei meinem neuesten Projekt (Mojo) benutze ich sehr exzessiv Prototypen.
Allerdings nicht um Fehler zu finden sondern um den Perl Compiler zu beeinflussen.
Die beiden folgenden Beispiele sehen sehr aehnlich aus, verhalten sich aber komplett unterschiedlich.
Allerdings nicht um Fehler zu finden sondern um den Perl Compiler zu beeinflussen.
Die beiden folgenden Beispiele sehen sehr aehnlich aus, verhalten sich aber komplett unterschiedlich.
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
package Foo;
print "Example 1\n";
sub on { print "on $_[0]\n" }
sub run { print "run $_[0]\n" }
on foo => run { print "foo!\n" };
package Bar;
print "Example 2\n";
sub on ($@) { print "on $_[0]\n" }
sub run (&@) { print "run $_[0]\n" }
on foo => run { print "foo!\n" };