Leser: 26
1
2
3
4
5
6
7
8
9
10
11
12
13
14
LoadFile "C:/Programme/MARIS/Perl/bin/perl512.dll"
LoadModule perl_module modules/mod_perl.so
PerlRequire "C:/Programme/MARIS/WebServer/conf/stdlibs.pl"
<IfModule mime_module>
# Perl handlers / types
<Files ~ "\.(cgi|pl|plx)$">
SetHandler perl-script
Options +ExecCGI
PerlHandler ModPerl::PerlRun
PerlSendHeader On
PerlSetupEnv On
</Files>
</IfModule>
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
$ perl -MLinux::Smaps -Mstrict -le ' my $s=Linux::Smaps->new; my $p; sub p { $s->update; my $c=$s->private_dirty+$s->private_clean; print $_[0], ": ", $c-$p; $p=$c; } p "start"; p "start2"; require CGI; p "required"; CGI->compile(":all"); p "compiled"; p "end" ' start: 1296 start2: 8 required: 1036 compiled: 2240 end: 0