File Coverage

blib/lib/Games/Nintendo/Mario/SMB.pm
Criterion Covered Total %
statement 13 14 92.8
branch n/a
condition n/a
subroutine 7 8 87.5
pod 1 1 100.0
total 21 23 91.3


line stmt bran cond sub pod time code
1 2     2   1172 use 5.16.0;
  2         7  
  2         73  
2 2     2   10 use warnings;
  2         3  
  2         97  
3             package Games::Nintendo::Mario::SMB 0.208;
4              
5 2     2   9 use base qw(Games::Nintendo::Mario);
  2         3  
  2         1596  
6              
7 16     16   45 sub _names { qw[Mario Luigi] }
8 16     16   38 sub _states { qw[normal super fire] }
9 7     7   16 sub _items { qw[mushroom flower] }
10              
11             sub _goto_hash {
12             {
13 16     16   109 damage => {
14             normal => 'dead',
15             _else => 'normal'
16             },
17             mushroom => {
18             fire => 'fire',
19             _else => 'super',
20             },
21             flower => {
22             normal => 'super',
23             _else => 'fire'
24             }
25             }
26             }
27              
28             sub games {
29 0     0 1   return ('Super Mario Bros.');
30             }
31              
32             "It's-a me! Mario!";
33              
34             __END__