1package SOAP::Apache; 2 3# -- SOAP::Lite -- soaplite.com -- Copyright (C) 2001 Paul Kulchenko -- 4 5use SOAP::Transport::HTTP; 6 7my $server = SOAP::Transport::HTTP::Apache 8 9 # specify list of objects-by-reference here 10 -> objects_by_reference(qw(My::PersistentIterator My::SessionIterator My::Chat)) 11 12 # specify path to My/Examples.pm here 13 -> dispatch_to('/Your/Path/To/Deployed/Modules', 'Module::Name', 'Module::method') 14 15 # if you want to use module from BOTH mod_perl and mod_soap 16 # you should use either static or mixed dispatching 17 # -> dispatch_to(qw(My::Examples My::Parameters My::PersistentIterator My::SessionIterator My::PingPong)) 18 19 # enable compression support 20 -> options({compress_threshold => 10000}) 21; 22 23sub handler { $server->handler(@_) } 24 251; 26