open(INPUT, "<$orderConfigFile") or die ("Error open file $orderConfigFile ($!)\n");
		my @content = <INPUT>;
		close INPUT;
		
		print "ungefilterte groesse des arrays ist " . scalar(@content) . "\n";
	
		#1. filtere kommentarzeilen und leerzeilen aus
		#2. danach entferne bei den übrigen das -> 
		#3. resultierende Liste enthält nur noch Regex/Datei
		my @cleanedContent = map{
					my $x = $_;
					chomp $x;
					if ($x =~ /(^->.*$)/){
						$x =~ s/^(->\s*)(.*)/$2/g;						
					}
					$x;								
				} grep{!/(^\s*([#].*)?$)/} @content;
		
		print "groesse nach filtern des arrays ist " . scalar(@cleanedContent) . "\n";