
	if($recurse and $param{type} eq "raw") {
		system($cmd{tar}, "-C", $pfad, "-cjf", "tmp.tar.bz2", ".");
		$outp = "$tmp/tmp.tar.bz2";
		$mime = "application/x-bzip2";
		$subst{Header} .= "Content-Disposition: attachment; filename='content.tar.bz2'\n";
	} elsif(not $recurse and $param{type} eq "raw") {
		$outp = $pfad . $param{what};
		$mime = "text/plain";
		$subst{Header} .= "Content-Disposition: attachment; filename='content.txt'\n";
	} elsif($param{type} eq "pdf") {
		open my $genuine, ">tmp.txt" or my_low_level_die("$!");
		
		@files = grep { ! /\.html?$/ and ! /\.pdf$/ and ! /\.png/ } @files;
		my_low_level_die "Keine Dateien zur Konvertierung in PDF vorhanden!"
			if scalar @files == 0;
		for (grep { ! /\.html?$/ and ! /\.pdf$/ and ! /\.png/ } @files) {
			open my $filename, $_ or my_low_level_die "$_: $!";
				my $t = join "", <$filename>;
				$t =~ s/\r//; # $illy DoS/Window$...
				print $genuine $t . "\n";
			close $filename;
		}
	
		close $genuine;

		open OLDOUT, ">>&STDOUT"    or my_low_level_die($!);  
		open OLDERR, ">>&STDERR"    or my_low_level_die($!);  
		open STDOUT, ">>/dev/null"  or my_low_level_die($!);  
		open STDERR, ">>&STDOUT"    or my_low_level_die($!);  

		system($cmd{dos2unix}, "tmp.txt");
		system($cmd{genuine}, "tmp.txt");
		system($cmd{latex}, "tmp.latex");
		system($cmd{latex}, "tmp.latex");
		system($cmd{latex}, "tmp.latex");
		system($cmd{latex}, "tmp.latex");
		system($cmd{dvips}, "tmp");
		system($cmd{ps2pdf}, "tmp.ps", "tmp.pdf");

		open STDOUT, ">>&OLDOUT" or my_low_level_die($!);
		open STDERR, ">>&OLDERR" or my_low_level_die($!);

		$outp = "$tmp/tmp.pdf";
		$mime = "application/pdf";
		$subst{Header} .= "Content-Disposition: attachment; filename='content.pdf'\n";
	}

	open my $output, $outp or my_low_level_die($!);
		undef $/;
		binmode $output;
		$binary = <$output>;
		unless($binary) {
			$binary = ""; undef $binary;
			my_low_level_die("Ausgabedatei leer!");
		}
	close $output;
	
	system($cmd{rm}, "-r", $tmp);

	$subst{Header} =~ s/'/"/g;
	$subst{Header} .= "Content-Type: $mime\n";
