Select Code to Download

#!/usr/bin/perl -w
...
  ;
print "Contact to SOAP server at ", $daemon->url, "\n";
$daemon->handle;

$ sudo ./soap_server.pl 
Contact to SOAP server at http://localhost:81/

$ cat perlmark.pl 
...
    printf STDERR " %.5s call/s\n", $result{$dest}{$test} = $tps / $te
+stnum;
  }
}

$ ./perlmark.pl 
...
daemon [array] skipped, 
daemon [simple] skipped, 
daemon [string] skipped,

    # specify list of objects-by-reference here
    -> objects_by_reference(qw(My::PersistentIterator My::SessionItera
+tor My::Chat))
    # specify path to My/Examples.pm here
    -> dispatch_to('/Your/Path/To/Deployed/Modules', 'Module::Name', '
+Module::method')