while (my $tmp = readdir(DIR)) {
                push(@inhalt,$tmp);
        };