#!/usr/bin/perl

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

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

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

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