File Coverage

blib/lib/TAP/Parser/Result/YAML.pm
Criterion Covered Total %
statement 10 10 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 1 1 100.0
total 15 15 100.0


line stmt bran cond sub pod time code
1             package TAP::Parser::Result::YAML;
2              
3 32     32   240 use strict;
  32         85  
  32         1002  
4 32     32   210 use warnings;
  32         86  
  32         1019  
5              
6 32     32   236 use base 'TAP::Parser::Result';
  32         81  
  32         3993  
7              
8             =head1 NAME
9              
10             TAP::Parser::Result::YAML - YAML result token.
11              
12             =head1 VERSION
13              
14             Version 3.40_01
15              
16             =cut
17              
18             our $VERSION = '3.40_01';
19              
20             =head1 DESCRIPTION
21              
22             This is a subclass of L. A token of this class will be
23             returned if a YAML block is encountered.
24              
25             1..1
26             ok 1 - woo hooo!
27              
28             C<1..1> is the plan. Gotta have a plan.
29              
30             =head1 OVERRIDDEN METHODS
31              
32             Mainly listed here to shut up the pitiful screams of the pod coverage tests.
33             They keep me awake at night.
34              
35             =over 4
36              
37             =item * C
38              
39             =item * C
40              
41             =back
42              
43             =cut
44              
45             ##############################################################################
46              
47             =head2 Instance Methods
48              
49             =head3 C
50              
51             if ( $result->is_yaml ) {
52             print $result->data;
53             }
54              
55             Return the parsed YAML data for this result
56              
57             =cut
58              
59 7     7 1 5171 sub data { shift->{data} }
60              
61             1;