File Coverage

blib/lib/App/Docker/Client/Exception.pm

Criterion	Covered	Total	%
statement	8	18	44.4
branch	0	6	0.0
condition			n/a
subroutine	3	10	30.0
pod	7	7	100.0
total	18	41	43.9

package App::Docker::Client::Exception;

use 5.16.0;
use strict;
use warnings;

=head1 NAME

App::Docker::Client::Exception - Exception class for App::Docker::Client.

=head1 VERSION

Version 0.010200

=cut

our $VERSION = '0.010200';

=head2 new

Constructor

=cut

sub new {
    my $class = shift;
    my $self  = {@_};
    bless $self, $class;
    return $self;
}

=head2 is_not_fround

=cut

sub is_not_fround   { $_[0]->{code} == 404 ? 1                           : 0 }

=head2 is_confict

=cut

sub is_confict      { $_[0]->{code} == 409 ? 1                           : 0 }

=head2 code

=cut

sub code            { $_[0]->{code} }

=head2 content

=cut

sub content         { $_[0]->{content} }

=head2 content_message

=cut

sub content_message { $_[0]->{content}     ? $_[0]->{content}->{message} : undef }

=head2 message

=cut

sub message         { $_[0]->{message} }

1;    # End of App::Docker::Client::Exception

__END__