if (!defined($ARGV[0])){
	print "Projektpfad fehlt!";
	die "Programm beendet!";
	}

else {
	# Prüfen ob Verzeichniss exisitiert
	find(\&wanted, "$svn_server_addresse");
	
	sub wanted {
		if ( $File::Find::name =~ $$ARGV[0] ) {print " \nVerzeichnis gefunden!";}
		else {print "Verzeichnis nicht gefunden!\n" ;}
	}