File Coverage

blib/lib/Business/CyberSource/RequestPart/Service.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             package Business::CyberSource::RequestPart::Service;
2 7     7   3993 use strict;
  7         11  
  7         214  
3 7     7   28 use warnings;
  7         11  
  7         229  
4 7     7   459 use namespace::autoclean;
  7         12508  
  7         42  
5              
6             our $VERSION = '0.010008'; # VERSION
7              
8 7     7   935 use Moose;
  7         296682  
  7         46  
9             extends 'Business::CyberSource::MessagePart';
10             with 'MooseX::RemoteHelper::CompositeSerialization';
11              
12             has run => (
13             isa => 'Bool',
14             remote_name => 'run',
15             is => 'ro',
16             lazy => 1,
17             init_arg => undef,
18             reader => undef,
19             writer => undef,
20             default => sub { 1 },
21             serializer => sub {
22             my ( $attr, $instance ) = @_;
23             return $attr->get_value( $instance ) ? 'true' : 'false';
24             },
25             );
26              
27             __PACKAGE__->meta->make_immutable;
28             1;
29              
30             # ABSTRACT: Service Request Part
31              
32             __END__
33              
34             =pod
35              
36             =encoding UTF-8
37              
38             =head1 NAME
39              
40             Business::CyberSource::RequestPart::Service - Service Request Part
41              
42             =head1 VERSION
43              
44             version 0.010008
45              
46             =head1 DESCRIPTION
47              
48             Service provides support for the portion of requests that are named as
49             C<cc*Service> this tells CyberSource which type of request to make. All of the
50             L<Business::CyberSource::Request> based classes will add this correctly.
51             Depending on the request type you may have to set either
52             L<capture_request_id|/"capture_request_id"> or
53             L<auth_request_id|/"auth_request_id">
54              
55             =head1 EXTENDS
56              
57             L<Business::CyberSource::MessagePart>
58              
59             =head1 ATTRIBUTES
60              
61             =head2 run
62              
63             run will be set correctly by default on ever request
64              
65             =head1 BUGS
66              
67             Please report any bugs or feature requests on the bugtracker website
68             https://github.com/hostgator/business-cybersource/issues
69              
70             When submitting a bug or request, please include a test-file or a
71             patch to an existing test-file that illustrates the bug or desired
72             feature.
73              
74             =head1 AUTHOR
75              
76             Caleb Cushing <xenoterracide@gmail.com>
77              
78             =head1 COPYRIGHT AND LICENSE
79              
80             This software is Copyright (c) 2017 by Caleb Cushing <xenoterracide@gmail.com>.
81              
82             This is free software, licensed under:
83              
84             The Artistic License 2.0 (GPL Compatible)
85              
86             =cut