view release on metacpan or  search on metacpan

lib/Business/cXML.pm  view on Meta::CPAN

214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
                $tx->add(URL => $self->{local});
                foreach my $opt (grep { $_ ne '__handler' } keys (%{ $self->{routes}{$route} })) {
                        $tx->add('Option', $self->{routes}{$route}{$opt}, name => $opt);
                };
        };
}
 
 
=item C<B<sender_callback>( I<$sub> )>
 
By default, a request's From/Sender credentials are only used to guess
response credentials.  If you specify a callback here, it will be invoked
immediately after XML parsing, before passing to transaction handlers, giving
you an opportunity to authenticate the caller.
 
Your subroutine will be passed 3 arguments:
 
=over
 
=item 1. The current L<Business::cXML> object