my $data = $self->{DATA}; # Socket für den Datentransfer
	my $len = 0;
	while( my $x = read($fh, my $buffer, 2048) ){
		print "#";
		$data->print($buffer);
		$len += $x;
	}
	$data->flush;