File Coverage

blib/lib/Catmandu/Fix/Condition/is_string.pm
Criterion Covered Total %
statement 17 17 100.0
branch 2 2 100.0
condition n/a
subroutine 7 7 100.0
pod n/a
total 26 26 100.0


line stmt bran cond sub pod time code
1              
2             use Catmandu::Sane;
3 1     1   688  
  1         2  
  1         6  
4             our $VERSION = '1.2019';
5              
6             use Moo;
7 1     1   6 use Catmandu::Util qw(is_number is_value);
  1         2  
  1         5  
8 1     1   353 use namespace::clean;
  1         8  
  1         48  
9 1     1   6 use Catmandu::Fix::Has;
  1         2  
  1         5  
10 1     1   295  
  1         2  
  1         7  
11             has path => (fix_arg => 1);
12              
13             with 'Catmandu::Fix::Condition::Builder::Simple';
14              
15             sub {
16             !is_number($_[0]) && is_value($_[0]);
17             };
18 8 100   8   158 }
19 1     1   11  
20             1;
21              
22              
23             =pod
24              
25             =head1 NAME
26              
27             Catmandu::Fix::Condition::is_string - only execute fixes if all path values are strings
28              
29             =head1 SYNOPSIS
30              
31             if is_string(data.*)
32             ...
33             end
34              
35             =head1 SEE ALSO
36              
37             L<Catmandu::Fix>
38              
39             =cut