for(my $j = 0;$j <= 8;$j++){
if (-e $Files[$j]){
	if (-z $Files[$j]){
		push(@noData , "d:/perl/test/".$Date."/".$i."/".$Files[$j]);
	}
	else{
		# parse die aktuelle Datei
		$testSuitName=$Files[$j];
		$pParser -> parsefile($Files[$j]);
	}
}
}