File Coverage

blib/lib/WWW/Shopify/Liquid/Filter/IsHash.pm
Criterion Covered Total %
statement 12 16 75.0
branch n/a
condition 0 3 0.0
subroutine 4 7 57.1
pod 0 3 0.0
total 16 29 55.1


line stmt bran cond sub pod time code
1             #!/usr/bin/perl
2 37     37   14878 use strict;
  37         114  
  37         1060  
3 37     37   223 use warnings;
  37         85  
  37         952  
4 37     37   219 use utf8;
  37         95  
  37         277  
5              
6             package WWW::Shopify::Liquid::Filter::IsHash;
7 37     37   1335 use base 'WWW::Shopify::Liquid::Filter';
  37         96  
  37         6471  
8              
9 0     0 0   sub min_arguments { return 0; }
10 0     0 0   sub max_arguments { return 0; }
11             sub operate {
12 0     0 0   my ($self, $hash, $operand, @arguments) = @_;
13 0   0       return ref($operand) && ref($operand) eq "HASH";
14             }
15              
16             1;