File Coverage

lib/JMAP/Validation/Tests/Array.pm
Criterion Covered Total %
statement 8 8 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod 0 1 0.0
total 11 12 91.6


line stmt bran cond sub pod time code
1             package JMAP::Validation::Tests::Array;
2              
3 11     11   36 use strict;
  11         19  
  11         245  
4 11     11   42 use warnings;
  11         11  
  11         509  
5              
6             sub is_array {
7 995588     995588 0 750993 my ($value) = @_;
8              
9 995588         1980399 return ref($value) eq 'ARRAY';
10             }
11              
12             1;