The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

TAP::Parser::Iterator - Internal TAP::Parser Iterator

VERSION

Version 0.54

SYNOPSIS

use TAP::Parser::Iterator;
my $it = TAP::Parser::Iterator->new(\*TEST);
my $it = TAP::Parser::Iterator->new(\@array);

my $line = $it->next;

Originally ripped off from Test::Harness.

DESCRIPTION

FOR INTERNAL USE ONLY!

This is a simple iterator wrapper for arrays and filehandles.

Class Methods

new

my $iter = TAP::Parser::Iterator->new( $array_reference );
my $iter = TAP::Parser::Iterator->new( $filehandle );

Create an iterator.

Instance Methods

next

while ( my $item = $iter->next ) { ... }

Iterate through it, of course.

next_raw

while ( my $item = $iter->next_raw ) { ... }

Iterate raw input without applying any fixes for quirky input syntax.