Thread Links für Perl-Neulinge (26 answers)
Opened by renee at 2005-09-22 15:22

Strat
 2005-09-22 20:35
#17599 #17599
User since
2003-08-04
5246 Artikel
ModeratorIn
[Homepage] [default_avatar]
nein; bless mit nur einem parameter verwendet den aktuellen namensraum als klasse. solange du nicht mit vererbung arbeitest, spielt der unterschied zum bless mit zwei parametern (referenz, klasse) keine rolle

teste mal den unterschied:

mit zwei:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
package MyParent;
sub new {
  bless ({}, shift());
}
package MySon;
use base qw(MyParent);
sub one {
  my ($self) = shift;
  print "one\n";
}
package main;
my $obj = MySon->new();
$obj->one();

und mit einem:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
package MyParent;
sub new {
  bless {};
}
package MySon;
use base qw(MyParent);
sub one {
  my ($self) = shift;
  print "one\n";
}
package main;
my $obj = MySon->new();
$obj->one();
perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/

View full thread Links für Perl-Neulinge