| … | |
… | |
| 33 | # This module should be installed as a Handler for the location selected for |
33 | # This module should be installed as a Handler for the location selected for |
| 34 | # WeBWorK on your webserver. Here is an example of a stanza that can be added |
34 | # WeBWorK on your webserver. Here is an example of a stanza that can be added |
| 35 | # to your httpd.conf file to achieve this: |
35 | # to your httpd.conf file to achieve this: |
| 36 | # |
36 | # |
| 37 | # <IfModule mod_perl.c> |
37 | # <IfModule mod_perl.c> |
| 38 | # PerlFreshRestart On |
38 | # PerlFreshRestart On |
| 39 | # <Location /modperl-sam> |
39 | # <Location /webwork> |
| 40 | # SetHandler perl-script |
40 | # SetHandler perl-script |
| 41 | # PerlSetVar webwork_root /opt/webwork |
|
|
| 42 | # <Perl> |
|
|
| 43 | # use lib '/opt/webwork/lib'; |
|
|
| 44 | # </Perl> |
|
|
| 45 | # PerlHandler Apache::WeBWorK |
41 | # PerlHandler Apache::WeBWorK |
|
|
42 | # PerlSetVar webwork_root /path/to/webwork-modperl |
|
|
43 | # <Perl> |
|
|
44 | # use lib '/path/to/webwork-modperl/lib'; |
|
|
45 | # use lib '/path/to/webwork-modperl/pglib'; |
|
|
46 | # </Perl> |
| 46 | # </Location> |
47 | # </Location> |
| 47 | # </IfModule> |
48 | # </IfModule> |
| 48 | |
49 | |
| 49 | sub handler() { |
50 | sub handler() { |
| 50 | my $r = Apache::Request->new(shift); # have to deal with unpredictable GET or POST data, and sift through it for the key. So use Apache::Request |
51 | my $r = Apache::Request->new(shift); # have to deal with unpredictable GET or POST data, and sift through it for the key. So use Apache::Request |
| 51 | |
52 | |