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

package Net::EPP::Frame::Command::Transfer;
use Net::EPP::Frame::Command::Transfer::Contact;
use Net::EPP::Frame::Command::Transfer::Domain;
use base qw(Net::EPP::Frame::Command);
use strict;

=pod

=head1 NAME

Net::EPP::Frame::Command::Transfer - an instance of L
for the EPP CtransferE> command.

=head1 OBJECT HIERARCHY

    L
    +----L
        +----L
            +----L
                +----L

=head1 METHODS

	$frame->setOp($op);

Sets the op of the frame (i.e. C, C, C or C).

=cut

sub setOp {
	my ($self, $op) = @_;
	$self->getCommandNode->setAttribute('op', $op);
}

1;