Leser: 26
1 2 3 4 5 6 7 8
#!/usr/bin/perl use FCGI; my $count = 0; my $request = FCGI::Request(); while($request->Accept() >= 0) { print("Content-type: text/html\r\n\r\n", ++$count); }
1 2 3 4
my $C = new CGI; print $C->p("bla"); print $C->start_div(),C->end_div(); ...etc..
2011-03-15T07:26:28 GustlIch verstehe das so, das meine Darstellung etc. jetzt in die while schleife muss.
Mein Problem: Bei CGI war es so:
Code (perl): (dl )1 2 3 4my $C = new CGI; print $C->p("bla"); print $C->start_div(),C->end_div(); ...etc..
Geht das jetzt bei FCGI nicht mehr?
Oder wie löse ich das?
Gruß
Edit: Oder kann ich trotzdem noch das CGI modl verwenden und damit die darstellung machen?
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
#!/usr/bin/perl use CGI::Fast; Initialisierung(); while (my $cgi_req = new CGI::Fast) { MeinProgramm($cgi_req); } sub Initialisierung { # hier die notwendigen Voreinstellungen für das Programm } sub MeinProgramm { my $C = shift; print $C->p("bla"); print $C->start_div(),C->end_div(); #...etc.. }
1 2 3 4 5 6 7 8 9 10 11 12
use FCGI; my $count = 0; my $request = FCGI::Request(); while($request->Accept() >= 0) { myProg(); } sub myProg { my $C = new CGI; print $C->p("bla"); print $C->start_div(),C->end_div(); }
1 2 3 4 5 6 7 8 9 10 11 12
#!/usr/bin/perl -w use FCGI; use CGI; my $count = 0; my $request = FCGI::Request(); while($request->Accept() >= 0) { my $C = new CGI; print("Content-type: text/html\r\n\r\n", ++$count); print $C->h1("HUHU"); }
2011-03-15T19:56:44 GustlSupport meinte das sie FCGI, zumindest für mich, nicht untersützen können
2011-03-15T19:56:44 Gustler hat sich gefragt warum das einbinden überhaupt funktioniert.