NAME

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

VERSION

Version 0.41

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->is_first ) { ... }
  if ( $it->is_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.

is_first()

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

is_last()

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