close STDOUT;
2020-03-25T18:29:54 GustlAber eigentlich wollte ich folgendes erreichen:
* HTML Code ausgeben
* Danach gibt er ja den Status 200 zurück
* Dann soll er die restlichen Subroutinen quasi "abarbeiten", ohne das der Browser noch warten muss.
* Quasi dann im Hintergrund, nach der HTML-Antwort
2020-03-26T09:19:58 GustlWebserver ist ein IIS Version 8.5.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43
use strict; use warnings; use File::Temp (); use POSIX ":sys_wait_h"; my $app = sub { my $temp = File::Temp->new(UNLINK => 0); my $filename = $temp->filename; my $pid = fork(); defined $pid or return [ 500, ["Content-type" => 'text/plain'], ["Could not fork: $!"] ]; if ($pid) { # parent process: reap children which are done, # then print response and return my $kid; do { $kid = waitpid(-1, WNOHANG); } while $kid < -1; return [ 200, ["Content-type" => 'text/plain'], ["Started process with pid '$pid'\n", "Printing to '$filename'\n", ], ]; } else { # child process: take 10 seconds to print, then exit my $count = 1; while ($count < 10) { print $temp $count++,"\n"; sleep 1; } close $temp; exit 0; } }
QuoteDatei wird nicht erzeugt.End of script output before headers: test_child.pl
2020-03-27T08:22:30 biancaGibt es im Markt einen Webhoster, der den im shared Hosting einsetzt?
2020-03-27T09:04:22 hajSeit es VMs für 3€/Monat gibt, habe ich über Shared Hosting auch nicht mehr nachgedacht...
<meta http-equiv = "refresh" content = "6; URL=./meinskript.cgi?todo=beeildich&sid=12345">