Thread Module: Objekte voneinander trennen? (8 answers)
Opened by Froschpopo at 2010-02-19 15:29

Froschpopo
 2010-02-19 15:29
#133310 #133310
User since
2003-08-15
2653 Artikel
BenutzerIn
[default_avatar]
Hallo :)

Ich hoffe der Titel trifft es einigermaßen.

habe folgendes Testmodul:
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

package MyModules::Test;

use strict;
use warnings;

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

sub farbe {
        my ($self, $farbe) = @_;
        $self->{FARBE} = $farbe if(defined $farbe);
        return $self->{FARBE};
}

1;


Aufruf:
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14

#!/usr/bin/perl

use strict;
use warnings;
use MyModules::Test;

my $obj = MyModules::Test->new;

my $farbe_1 = $obj->farbe('rot');
my $farbe_2 = $obj->farbe('blau');

print $farbe_2->farbe;
print $farbe_1->farbe;
$farbe_2->delete;


Es wundert mich nicht, dass er immer erzählt, dass er Methode "farbe" nicht finden kann. Wie macht man das, dass es funktioniert?

Ich möchte die Objekte in einer Variablen speichern können um später damit noch weitere Dinge tun zu können (z.B. delete() usw.).

Ich hoffe ihr versteht mich :D
Es geht hier weniger um farben, sondern ich will vielmehr diese Vorgehensweise verstehen können.
Last edited: 2010-02-19 15:36:37 +0100 (CET)

View full thread Module: Objekte voneinander trennen?