Select Code to Download

perl -I../lib -MMaypole::CLI=Boss::Opera::Maypole::App -e1 "http://loc
+alhost/opera/op_operator/list"

127.0.0.1 - - [15/Feb/2005:21:26:51 +0100] "GET /opera/op_operator/lis
+t HTTP/1.1" 404 329

[Tue Feb 15 21:26:51 2005] [error] [client 127.0.0.1] File does not ex
+ist: C:/.../source/web/htdocs/opera, referer: http://localhost/opera/

Maypole 2.09 (reinstalled to make sure it wasn't a stale version like 
+last time)
Apache/2.0.48 (Win32)

PerlRequire "C:/.../source/web/startup.pl"
<Location /opera>
    SetHandler perl-script
    PerlHandler Boss::Opera::Maypole::App
</Location>

package Boss::Opera::Maypole::App;
use Maypole::Application;
...
__PACKAGE__->config->display_tables([qw/ op_operator op_product_group 
+/]);

Boss::Opera::Operator->untaint_columns( printable => [qw/name/], integ
+er => [qw/gs_operator_id/] );

warn("new parse_path\n");
sub parse_path {
...
    cluck(Dumper($self, \@_));    
    $self->SUPER::parse_path(@_);
}