File Coverage

blib/lib/WWW/Shopify/Liquid/Filter/Round.pm
Criterion Covered Total %
statement 12 17 70.5
branch 0 2 0.0
condition 0 6 0.0
subroutine 4 7 57.1
pod 0 3 0.0
total 16 35 45.7


line stmt bran cond sub pod time code
1             #!/usr/bin/perl
2 37     37   15437 use strict;
  37         112  
  37         1309  
3 37     37   244 use warnings;
  37         98  
  37         1568  
4              
5 37     37   243 package WWW::Shopify::Liquid::Filter::Round; use base 'WWW::Shopify::Liquid::Filter';
  37         95  
  37         3724  
6              
7 37     37   289 use Scalar::Util qw(looks_like_number);
  37         97  
  37         5516  
8              
9 0     0 0   sub min_arguments { return 0; }
10 0     0 0   sub max_arguments { return 1; }
11             sub operate {
12 0     0 0   my ($self, $hash, $operand, $decimals) = @_;
13 0 0 0       $decimals = 0 unless $decimals && looks_like_number($decimals) && $decimals >= 0;
      0        
14 0           return sprintf('%.' . $decimals . 'f', $operand);
15             }
16              
17             1;