Opened by [E|B] at 2004-05-09 21:42
User since
2003-08-08
2561 Artikel
HausmeisterIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-08-08
2561 Artikel
HausmeisterIn
Hallo!
Da ich noch nicht sonderlich viel mit OOP in Perl gemacht habe, bin ich dabei, mich etwas einzuarbeiten.
Mit sind folgende Funktionen nicht klar. Ich habe versucht etwas darüber zu finden, bekomme aber immer nur ungenaue Beschreibungen, die nicht sonderlich weiterhelfen. Vielleicht kann jemand mir zu jedem ein kleines Snippet geben... Das wäre nett.
Hier im einzelnen, was ich nicht genau verstehe:
1. @ISA
2. require Exporter;
3. @EXPORT bzw. @EXPORT_OK
4. use vars qw(...)
5. $VERSION
6. require 5.000;
Was machen die im einzelnen? So im groben weiß ich es ja (@ISA für Mehrfachvererbung, z.B.) Aber wie setzt man die richtig ein? Ein Snippet wäre schön.
Danke!
Da ich noch nicht sonderlich viel mit OOP in Perl gemacht habe, bin ich dabei, mich etwas einzuarbeiten.
Mit sind folgende Funktionen nicht klar. Ich habe versucht etwas darüber zu finden, bekomme aber immer nur ungenaue Beschreibungen, die nicht sonderlich weiterhelfen. Vielleicht kann jemand mir zu jedem ein kleines Snippet geben... Das wäre nett.
Hier im einzelnen, was ich nicht genau verstehe:
1. @ISA
2. require Exporter;
3. @EXPORT bzw. @EXPORT_OK
4. use vars qw(...)
5. $VERSION
6. require 5.000;
Was machen die im einzelnen? So im groben weiß ich es ja (@ISA für Mehrfachvererbung, z.B.) Aber wie setzt man die richtig ein? Ein Snippet wäre schön.
Danke!
Gruß, Erik!
s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}
It's not a bug, it's a feature! - [CGI-World.de]
s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}
It's not a bug, it's a feature! - [CGI-World.de]