File Coverage

lib/XML/Compile/SOAP/Util.pm
Criterion Covered Total %
statement 30 30 100.0
branch n/a
condition n/a
subroutine 10 10 100.0
pod n/a
total 40 40 100.0


line stmt bran cond sub pod time code
1             # Copyrights 2007-2022 by [Mark Overmeer ].
2             # For other contributors see ChangeLog.
3             # See the manual pages for details on the licensing terms.
4             # Pod stripped from pm file by OODoc 2.03.
5             # This code is part of distribution XML-Compile-SOAP. Meta-POD processed
6             # with OODoc into POD and HTML manual-pages. See README.md
7             # Copyright Mark Overmeer. Licensed under the same terms as Perl itself.
8              
9             package XML::Compile::SOAP::Util;
10 7     7   162372 use vars '$VERSION';
  7         15  
  7         362  
11             $VERSION = '3.28';
12              
13 7     7   61 use base 'Exporter';
  7         17  
  7         700  
14              
15 7     7   42 use warnings;
  7         10  
  7         164  
16 7     7   39 use strict;
  7         12  
  7         707  
17              
18             my @soap10 = qw/SOAP11HTTP WSDL11HTTP WSDL11MIME SOAP11ENV/;
19             my @soap11 = qw/SOAP11ENV SOAP11ENC SOAP11NEXT SOAP11HTTP WSDL11SOAP/;
20             my @wsdl11 = qw/WSDL11 WSDL11SOAP WSDL11HTTP WSDL11MIME WSDL11SOAP12/;
21             my @daemon = qw/MSEXT XC_DAEMON_NS/;
22             my @xop10 = qw/XOP10 XMIME10 XMIME11/;
23              
24             our @EXPORT_OK = (@soap10, @soap11, @wsdl11, @daemon, @xop10);
25             our %EXPORT_TAGS =
26             ( soap10 => \@soap10
27             , soap11 => \@soap11
28             , wsdl11 => \@wsdl11
29             , daemon => \@daemon
30             , xop10 => \@xop10
31             );
32              
33              
34 7     7   47 use constant SOAP11 => 'http://schemas.xmlsoap.org/soap/';
  7         11  
  7         600  
35             use constant
36 7         689 { SOAP11ENV => SOAP11. 'envelope/'
37             , SOAP11ENC => SOAP11. 'encoding/'
38             , SOAP11NEXT => SOAP11. 'actor/next'
39             , SOAP11HTTP => SOAP11. 'http'
40 7     7   41 };
  7         26  
41              
42              
43 7     7   43 use constant WSDL11 => 'http://schemas.xmlsoap.org/wsdl/';
  7         11  
  7         484  
44             use constant
45 7         506 { WSDL11SOAP => WSDL11. 'soap/'
46             , WSDL11HTTP => WSDL11. 'http/'
47             , WSDL11MIME => WSDL11. 'mime/'
48             , WSDL11SOAP12 => WSDL11. 'soap12/'
49 7     7   43 };
  7         21  
50            
51              
52             use constant
53 7         559 { MSEXT => SOAP11ENV
54             , XC_DAEMON_NS => 'http://perl.org/xml-schemas/xml-compile-daemon/1.0'
55 7     7   47 };
  7         34  
56              
57              
58              
59             use constant
60 7         529 { XOP10 => 'http://www.w3.org/2004/08/xop/include'
61             , XMIME10 => 'http://www.w3.org/2004/11/xmlmime'
62             , XMIME11 => 'http://www.w3.org/2005/05/xmlmime'
63 7     7   39 };
  7         10  
64              
65             1;