Net::Akamai::RequestData::Types - Define request data types for coercion

Net-Akamai documentation Contained in the Net-Akamai distribution.

Index

Code Index:

NAME

Top

Net::Akamai::RequestData::Types - Define request data types for coercion

DESCRIPTION

Top

Data type definitions

Types

Top

Net::Akamai::RequestData::Types::PurgeOptions

SOAP::Data object

Net::Akamai::RequestData::Types::PurgeOptionsArrayRef

ArrayRef of Net::Akamai::RequestData::Types::PurgeOptions

Net::Akamai::RequestData::Types::PurgeAction

invalidate or remove

Net::Akamai::RequestData::Types::PurgeType

cpcode or arl

AUTHOR

Top

John Goulah <jgoulah@cpan.org>

LICENSE

Top

This library is free software, you can redistribute it and/or modify it under the same terms as Perl itself.

Net-Akamai documentation Contained in the Net-Akamai distribution. 
package Net::Akamai::RequestData::Types;

use Moose;
use SOAP::Lite;
use Moose::Util::TypeConstraints;


subtype 'Net::Akamai::RequestData::Types::PurgeOptions'
	=> as 'Object'
	=> where { $_->isa('SOAP::Data') };


subtype 'Net::Akamai::RequestData::Types::PurgeOptionsArrayRef'
	=> as 'ArrayRef[Net::Akamai::RequestData::Types::PurgeOptions]';

coerce 'Net::Akamai::RequestData::Types::PurgeOptionsArrayRef'
	=> from 'ArrayRef[Str]'
	=> via { [map {SOAP::Data->type('string')->value("$_")} @$_] };


enum 'Net::Akamai::RequestData::Types::PurgeAction' => qw(invalidate remove);


enum 'Net::Akamai::RequestData::Types::PurgeType' => qw(cpcode arl);


1;