NAME

TAPx::Parser::Iterator - Internal TAPx::Parser Iterator

VERSION

Version 0.22

SYNOPSIS

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

my $line = $it->next;
if ( $it->first ) { ... }
if ( $it->last ) { ... }

Originally ripped off from Test::Harness.

DESCRIPTION

FOR INTERNAL USE ONLY!

This is a simple iterator wrapper for arrays and filehandles.

new()

Create an iterator.

next()

Iterate through it, of course.

first()

Returns true if on the first line. Must be called after next().

last()

Returns true if on or after the last line. Must be called after next().