File Coverage

blib/lib/Twitter/Text/Util.pm
Criterion Covered Total %
statement 20 20 100.0
branch n/a
condition n/a
subroutine 7 7 100.0
pod 0 1 0.0
total 27 28 96.4


line stmt bran cond sub pod time code
1             package
2             Twitter::Text::Util; # hide from PAUSE
3 4     4   687148 use strict;
  4         24  
  4         113  
4 4     4   21 use warnings;
  4         13  
  4         163  
5 4     4   24 no if $^V lt v5.13.9, 'warnings', 'utf8';
  4         8  
  4         49  
6 4     4   151 use Exporter 'import';
  4         8  
  4         154  
7 4     4   1311 use File::Share qw(dist_file);
  4         82308  
  4         207  
8 4     4   2402 use YAML::PP ();
  4         259309  
  4         397  
9             our @EXPORT = qw(
10             load_yaml
11             );
12              
13             # internal use only, do not use this module directly.
14              
15             sub load_yaml {
16 7     7 0 348 my $yamlname = shift;
17              
18 7         57 return [ YAML::PP::LoadFile(dist_file('Twitter-Text', "conformance/$yamlname")) ];
19             }
20              
21             1;