use strict;
use MyModul;

my $objekt = MyModul->new;

my $name1 = $objekt->search('Thomas');
my $name2 = $objekt->search('Martin');

print $name1->get,"\n";             #Thomas
print $name2->get,"\n";             #Martin