File Coverage

blib/lib/WWW/Shopify/Liquid/Operator/MultiplyAssignment.pm
Criterion Covered Total %
statement 10 13 76.9
branch n/a
condition n/a
subroutine 4 5 80.0
pod 0 2 0.0
total 14 20 70.0


line stmt bran cond sub pod time code
1             #!/usr/bin/perl
2 37     37   15995 use strict;
  37         108  
  37         1167  
3 37     37   242 use warnings;
  37         99  
  37         1478  
4              
5             package WWW::Shopify::Liquid::Operator::MultiplyAssignment;
6 37     37   246 use base 'WWW::Shopify::Liquid::Operator::Assignment';
  37         107  
  37         6950  
7 1318     1318 0 3871 sub symbol { return '*='; }
8             sub operate {
9 0     0 0   return first { ($_ cmp $_[4]) == 0 } ref($_[3]) eq "ARRAY";
  0            
10 0           return index($_[3], $_[4]) != -1;
11             }
12              
13             1;