Opened by Gast at 2004-07-05 22:28
User since
2003-08-04
12209 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
12209 Artikel
Admin1
[quote=ppm1,12.07.2004, 15:44]Und genau diese Dokumentation versehe ich nciht... Kannn mir da keienr helfen?[/quote]
wenn du so nett wärst und vielleicht etwas konkreter sagen
würdest, was du genau nicht verstehst?
in die while-schleife kommt nun dein normales programm. natürlich
möglichst alle variablen mit my() deklariert etc.
wenn du so nett wärst und vielleicht etwas konkreter sagen
würdest, was du genau nicht verstehst?
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
use CGI::Fast qw(:standard);
$COUNTER = 0;
while (new CGI::Fast) {
print header;
print start_html("Fast CGI Rocks");
h1("Fast CGI Rocks"),
"Invocation number ",b($COUNTER++),
" PID ",b($$),".",
hr;
print end_html;
}
in die while-schleife kommt nun dein normales programm. natürlich
möglichst alle variablen mit my() deklariert etc.
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem