File Coverage

blib/lib/Amphibic/Log/Entry.pm

Criterion	Covered	Total	%
statement	2	4	50.0
branch			n/a
condition			n/a
subroutine	2	2	100.0
pod			n/a
total	4	6	66.6

package # Hide from PAUSE
  Amphibic::Log::Entry;
BEGIN {
  $Amphibic::Log::Entry::VERSION = '0.02';
}

use Moose;

has 'facility' => (
  is       => 'ro',
  isa      => 'Str',
  required => 1,
);

has 'level' => (
  is       => 'ro',
  isa      => 'Str',
  required => 1,
);

has 'message' => (
  is       => 'ro',
  isa      => 'Str',
  required => 1,
);

sub as_string {
  my ($self) = @_;

  my $string = '['
    . $self->facility
    . ' '
    . $self->level
    . '] '
    . $self->message;

  return $string;
}

__PACKAGE__->meta->make_immutable;

1;