File Coverage

lib/Sisimai/Time.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 1 0.0
total 19 20 95.0


line stmt bran cond sub pod time code
1             package Sisimai::Time;
2 77     77   58348 use parent 'Time::Piece';
  77         369  
  77         503  
3 77     77   659781 use feature ':5.10';
  77         154  
  77         5647  
4 77     77   465 use strict;
  77         139  
  77         1351  
5 77     77   362 use warnings;
  77         142  
  77         5088  
6              
7             sub TO_JSON {
8             # Instance method for JSON::encode()
9             # @return [Integer] Machine time
10 575     575 0 10469 my $self = shift;
11 575         896 return $self->epoch;
12             }
13              
14             1;
15             __END__