opendir(my $fhDir, "$datasource") or die $!;
my @inhalt = readdir($fhDir);
closedir $fhDir or die $!;