GNU/Linux |
CentOS 5.4 |
|
![]() |
Test::Harness::Iterator(3pm) |
![]() |
Test::Harness::Iterator − Internal Test::Harness Iterator
use Test::Harness::Iterator; my $it = Test::Harness::Iterator->new(\*TEST); my $it = Test::Harness::Iterator->new(\@array); my $line = $it->next;
FOR INTERNAL USE ONLY !
This is a simple iterator wrapper for arrays and filehandles.
new()
Create an iterator.
next()
Iterate through it, of course.
![]() |
Test::Harness::Iterator(3pm) | ![]() |