File Coverage

blib/lib/W3C/SOAP/WSDL/Document/PortType.pm
Criterion Covered Total %
statement 24 30 80.0
branch n/a
condition n/a
subroutine 8 9 88.8
pod n/a
total 32 39 82.0


line stmt bran cond sub pod time code
1             package W3C::SOAP::WSDL::Document::PortType;
2              
3             # Created on: 2012-05-27 19:25:22
4             # Create by: Ivan Wills
5             # $Id$
6             # $Revision$, $HeadURL$, $Date$
7             # $Revision$, $Source$, $Date$
8              
9 1     1   1661 use Moose;
  1         4  
  1         6  
10 1     1   4884 use warnings;
  1         4  
  1         27  
11 1     1   5 use version;
  1         2  
  1         7  
12 1     1   54 use Carp;
  1         2  
  1         63  
13 1     1   5 use Scalar::Util;
  1         2  
  1         28  
14 1     1   5 use List::Util;
  1         1  
  1         47  
15             #use List::MoreUtils;
16 1     1   5 use Data::Dumper qw/Dumper/;
  1         10  
  1         43  
17 1     1   5 use English qw/ -no_match_vars /;
  1         2  
  1         7  
18              
19             extends 'W3C::SOAP::Document::Node';
20              
21             our $VERSION = version->new('0.11');
22              
23             has operations => (
24             is => 'rw',
25             isa => 'ArrayRef[W3C::SOAP::WSDL::Document::Operation]',
26             builder => '_operations',
27             lazy => 1,
28             );
29              
30             sub _operations {
31 0     0     my ($self) = @_;
32 0           my @operations;
33 0           my @nodes = $self->document->xpc->findnodes('wsdl:operation', $self->node);
34              
35 0           for my $node (@nodes) {
36 0           push @operations, W3C::SOAP::WSDL::Document::Operation->new(
37             parent_node => $self,
38             node => $node,
39             );
40             }
41              
42 0           return \@operations;
43             }
44              
45             1;
46              
47             __END__
48              
49             =head1 NAME
50              
51             W3C::SOAP::WSDL::Document::PortType - Represents the port types in a WSDL document
52              
53             =head1 VERSION
54              
55             This documentation refers to W3C::SOAP::WSDL::Document::PortType version 0.11.
56              
57              
58             =head1 SYNOPSIS
59              
60             use W3C::SOAP::WSDL::Document::PortType;
61              
62             # Brief but working code example(s) here showing the most common usage(s)
63             # This section will be as far as many users bother reading, so make it as
64             # educational and exemplary as possible.
65              
66              
67             =head1 DESCRIPTION
68              
69             A C<W3C::SOAP::WSDL::Document::PortType> object represents the portType tags
70             in a WSDL document.
71              
72             =head1 SUBROUTINES/METHODS
73              
74             =over 4
75              
76             =back
77              
78             =head1 DIAGNOSTICS
79              
80             =head1 CONFIGURATION AND ENVIRONMENT
81              
82             =head1 DEPENDENCIES
83              
84             =head1 INCOMPATIBILITIES
85              
86             =head1 BUGS AND LIMITATIONS
87              
88             There are no known bugs in this module.
89              
90             Please report problems to Ivan Wills (ivan.wills@gmail.com).
91              
92             Patches are welcome.
93              
94             =head1 AUTHOR
95              
96             Ivan Wills - (ivan.wills@gmail.com)
97              
98             =head1 LICENSE AND COPYRIGHT
99              
100             Copyright (c) 2012 Ivan Wills (14 Mullion Close, Hornsby Heights, NSW Australia 2077).
101             All rights reserved.
102              
103             This module is free software; you can redistribute it and/or modify it under
104             the same terms as Perl itself. See L<perlartistic>. This program is
105             distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY;
106             without even the implied warranty of MERCHANTABILITY or FITNESS FOR A
107             PARTICULAR PURPOSE.
108              
109             =cut