/
usr
/
local
/
share
/
perl5
/
TAP
/
Parser
/
Result
/
/usr/local/share/perl5/TAP/Parser/Result
mkdir
upload
Name
Size
Mode
Actions
Bailout.pm
1148
0444
edit
dl
rm
Comment.pm
986
0444
edit
dl
rm
Plan.pm
2048
0444
edit
dl
rm
Pragma.pm
946
0444
edit
dl
rm
Test.pm
6078
0444
edit
dl
rm
Unknown.pm
734
0444
edit
dl
rm
Version.pm
946
0444
edit
dl
rm
YAML.pm
880
0444
edit
dl
rm
Edit:
/usr/local/share/perl5/TAP/Parser/Result/YAML.pm
(880B)
package TAP::Parser::Result::YAML; use strict; use warnings; use base 'TAP::Parser::Result'; =head1 NAME TAP::Parser::Result::YAML - YAML result token. =head1 VERSION Version 3.36 =cut our $VERSION = '3.36'; =head1 DESCRIPTION This is a subclass of L<TAP::Parser::Result>. A token of this class will be returned if a YAML block is encountered. 1..1 ok 1 - woo hooo! C<1..1> is the plan. Gotta have a plan. =head1 OVERRIDDEN METHODS Mainly listed here to shut up the pitiful screams of the pod coverage tests. They keep me awake at night. =over 4 =item * C<as_string> =item * C<raw> =back =cut ############################################################################## =head2 Instance Methods =head3 C<data> if ( $result->is_yaml ) { print $result->data; } Return the parsed YAML data for this result =cut sub data { shift->{data} } 1;
Save
cmd:
run