Thread Verwendung von Instanzvariablen ?!? (8 answers)
Opened by JackBauer at 2008-04-30 14:54

JackBauer
 2008-04-30 14:54
#109019 #109019
User since
2008-04-30
16 Artikel
BenutzerIn
[default_avatar]
Hi!

Ich habe mir folgende Klasse definiert (nur das wesentlich dargestellt):

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
package mcg_util;

sub new 
{
	my $class = shift;
   	my $self  = {};
 	$self->{reader}			= undef;
 
    bless ($self, $class);
    return $self;
}

#accessor method for Testcase reader
sub reader 
{
	my $self = shift;
    if (@_) { $self->{reader} = $shift }
    return $self->{reader};
}

sub run
{
my %params = (
                'reader'    => $self->{reader},
                @_,
  );

  my $enable_running_mcg = $params{'reader'}->getTestCaseParam("enable_running_mcg");
}


In einer anderen Datei erstelle ich mir dann eine Instanz der Klasse wiefolgt:

Code: (dl )
1
2
3
		my $testcase = mcg_util->new();
		$testcase->reader($reader);
		$testcase->run();


Mit $testcase->reader($reader) möchte dabei die Variable $reader der Instanz zuweisen und in der Run-Methode anschließend darauf zugreifen. Anstattdessen erhalte ich allerdings die Fehlermeldung, dass die Methode getTestCaseParam nicht mit einem uninitialisierten Wert aufgerufen werden kann. Was geht hier schief?


Normalerweise programmiere ich in C++ oder Java. Seit kurzen bin ich allerdings dazu gezwungen Perl einzusetzen - daher bin ich für jeden Tipp dankbar :-)

Gruß JackBauer

View full thread Verwendung von Instanzvariablen ?!?