Can't call method - Wertzuweisung schlägt fehl? - #146856 (Allgemeines zu Perl)

Gast Karakash

2011-03-24 11:09

Wenn ich richtig verstanden habe liefert mir:

Code: (dl )

1
2
3

 package Foo;
    use base qw(Class::Accessor);
    Foo->mk_accessors( qw(far bar car) );

Jeweils eine Methode
far() bar() und car() welche mir jeweils eine Instanzvariable $far $bar $car zurückliefert?

Übertragen bedeutet dies:

Code: (dl )

package initialize;
use base qw(Class:Accessor);
initialize->mk_acessors(qw(IsFulfilled));
sub new() {
my $self=shift;
my $newInst={};
bless($newInst,$self);

}

package Method;
use base 'initialize';
use base qw(Class:Acessor);
Method->mk_acessors(qw(name));
	sub checkFulfilled() 
	{
		IsFulfilled=1;
	}

Ich vermute die antwort nein, und lese daher schonmal weiter...^^
Last edited: 2011-03-24 11:16:02 +0100 (CET)