File Coverage

blib/lib/Game/Cribbage/Play/Card.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             package Game::Cribbage::Play::Card;
2              
3 5     5   39 use strict;
  5         12  
  5         226  
4 5     5   26 use warnings;
  5         10  
  5         307  
5              
6 5     5   32 use Rope;
  5         8  
  5         29  
7 5     5   1880 use Rope::Autoload;
  5         12  
  5         41  
8              
9             property [qw/player card/] => (
10             initable => 1,
11             writeable => 0,
12             configurable => 0,
13             enumerable => 1
14             );
15              
16             function value => sub {
17             $_[0]->card->value;
18             };
19              
20             function symbol => sub {
21             $_[0]->card->symbol;
22             };
23              
24             1;