File Coverage

blib/lib/WWW/Shopify/Liquid/Filter/Escape.pm
Criterion Covered Total %
statement 12 12 100.0
branch 1 2 50.0
condition n/a
subroutine 4 4 100.0
pod 0 1 0.0
total 17 19 89.4


line stmt bran cond sub pod time code
1             #!/usr/bin/perl
2 37     37   14620 use strict;
  37         109  
  37         1393  
3 37     37   247 use warnings;
  37         103  
  37         1457  
4              
5 37     37   246 package WWW::Shopify::Liquid::Filter::Escape; use base 'WWW::Shopify::Liquid::Filter';
  37         100  
  37         5850  
6 1 50   1 0 8 sub operate { my $str = defined $_[2] ? $_[2] : ""; $str =~ s/"/\\"/g; return $str; }
  1         9  
  1         11  
7              
8             1;