File Coverage

blib/lib/Story/Interact/Character.pm
Criterion Covered Total %
statement 21 25 84.0
branch n/a
condition n/a
subroutine 8 11 72.7
pod 0 1 0.0
total 29 37 78.3


line stmt bran cond sub pod time code
1 5     5   84 use 5.010001;
  5         19  
2 5     5   25 use strict;
  5         17  
  5         110  
3 5     5   25 use warnings;
  5         10  
  5         357  
4              
5             package Story::Interact::Character;
6              
7             our $AUTHORITY = 'cpan:TOBYINK';
8             our $VERSION = '0.001013';
9              
10 5     5   2767 use Moo;
  5         57655  
  5         29  
11 5     5   10024 use Types::Common -types;
  5         1289572  
  5         54  
12 5     5   74621 use namespace::clean;
  5         60977  
  5         44  
13              
14             use overload (
15 0     0   0 q[bool] => sub { 1 },
16 0     0   0 q[""] => sub { shift->name },
17 5         75 fallback => 1,
18 5     5   5057 );
  5         16  
19              
20             has 'name' => (
21             is => 'ro',
22             isa => NonEmptyStr,
23             required => 1,
24             );
25              
26             has 'location' => (
27             is => 'rwp',
28             isa => Str | Undef,
29             );
30              
31             has [ qw( meta knows carries achieved ) ] => (
32             is => 'ro',
33             isa => HashRef,
34 40     40   23062 builder => sub { {} },
35             );
36              
37             sub TO_JSON {
38 0     0 0   +{ %{ +shift } };
  0            
39             }
40              
41             1;