package MeinModul;

sub new {
	# Standart new-deklaration...
}

sub getData {
	my $self = shift;
	my @daten = ("daten", "und noch mehr daten", "daten, überall nur daten");
	return @daten;
}
1;