use TAP::Parser::Source; use TAP::Parser::SourceHandler::RawTAP; my $source = TAP::Parser::Source->new->raw( \"1..1\nok 1\n" ); $source->assemble_meta; my $class = 'TAP::Parser::SourceHandler::RawTAP'; my $vote = $class->can_handle( $source ); my $iter = $class->make_iterator( $source );
1. Figure out if the TAP::Parser::Source it's given is raw TAP output (``can_handle'').
2. Creates an iterator for raw TAP output (``make_iterator'').
my $vote = $class->can_handle( $source );
Only votes if $source is an array, or a scalar with newlines. Casts the following votes:
0.9 if it's a scalar with '..' in it 0.7 if it's a scalar with 'ok' in it 0.3 if it's just a scalar with newlines 0.5 if it's an array
my $iterator = $class->make_iterator( $source );
Returns a new TAP::Parser::Iterator::Array for the source. "$source->raw" must be an array ref, or a scalar ref.