File Coverage

blib/lib/Net/EPP/Frame/Command/Transfer.pm
Criterion Covered Total %
statement 12 14 85.7
branch n/a
condition n/a
subroutine 4 5 80.0
pod 0 1 0.0
total 16 20 80.0


line stmt bran cond sub pod time code
1             package Net::EPP::Frame::Command::Transfer;
2 1     1   430 use Net::EPP::Frame::Command::Transfer::Contact;
  1         6  
  1         27  
3 1     1   420 use Net::EPP::Frame::Command::Transfer::Domain;
  1         3  
  1         29  
4 1     1   6 use base qw(Net::EPP::Frame::Command);
  1         2  
  1         91  
5 1     1   7 use strict;
  1         2  
  1         71  
6              
7             =pod
8              
9             =head1 NAME
10              
11             Net::EPP::Frame::Command::Transfer - an instance of L
12             for the EPP CtransferE> command.
13              
14             =head1 OBJECT HIERARCHY
15              
16             L
17             +----L
18             +----L
19             +----L
20             +----L
21              
22             =head1 METHODS
23              
24             $frame->setOp($op);
25              
26             Sets the op of the frame (i.e. C, C, C or C).
27              
28             =cut
29              
30             sub setOp {
31 0     0 0   my ($self, $op) = @_;
32 0           $self->getCommandNode->setAttribute('op', $op);
33             }
34              
35             1;