File Coverage

lib/eBay/API/XML/DataType/LocalListingDistancesRegularDefinitionType.pm
Criterion Covered Total %
statement 7 9 77.7
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 10 12 83.3


line stmt bran cond sub pod time code
1             #!/usr/bin/perl
2              
3             package eBay::API::XML::DataType::LocalListingDistancesRegularDefinitionType;
4              
5 1     1   1379 use strict;
  1         3  
  1         29  
6 1     1   5 use warnings;
  1         3  
  1         32  
7              
8             ##########################################################################
9             #
10             # Module: ............... eBay/API/XML
11             # File: ................. LocalListingDistancesRegularDefinitionType.pm
12             # Generated by: ......... genEBayApiDataTypes.pl
13             # Last Generated: ....... 08/24/2008 16:44
14             # API Release Number: ... 579
15             #
16             ##########################################################################
17              
18             =head1 NAME
19              
20             eBay::API::XML::DataType::LocalListingDistancesRegularDefinitionType
21              
22             =head1 DESCRIPTION
23              
24             Defines the LocalListingDistancesRegular feature. This feature displays all the supported local listing
25             distances for items listed by sellers subscribed to Local Market for Vehicles.
26              
27              
28              
29             =head1 SYNOPSIS
30              
31             =cut
32              
33              
34             =head1 INHERITANCE
35              
36             eBay::API::XML::DataType::LocalListingDistancesRegularDefinitionType inherits from the L class
37              
38             =cut
39              
40 1     1   42 use eBay::API::XML::BaseDataType;
  0            
  0            
41             our @ISA = ("eBay::API::XML::BaseDataType");
42              
43              
44              
45             my @gaProperties = (
46             );
47             push @gaProperties, @{eBay::API::XML::BaseDataType::getPropertiesList()};
48              
49             my @gaAttributes = (
50             );
51             push @gaAttributes, @{eBay::API::XML::BaseDataType::getAttributesList()};
52              
53             =head1 Subroutines:
54              
55             =cut
56              
57             sub new {
58             my $classname = shift;
59             my %args = @_;
60             my $self = $classname->SUPER::new(%args);
61             return $self;
62             }
63              
64             sub isScalar {
65             return 0;
66             }
67              
68              
69              
70              
71              
72              
73             ## Attribute and Property lists
74             sub getPropertiesList {
75             my $self = shift;
76             return \@gaProperties;
77             }
78              
79             sub getAttributesList {
80             my $self = shift;
81             return \@gaAttributes;
82             }
83              
84              
85              
86             1;