1Test::Harness::Iterator(P3eprml)Programmers Reference GTueisdte::Harness::Iterator(3pm)
2
3
4
6 Test::Harness::Iterator - Internal Test::Harness Iterator
7
9 use Test::Harness::Iterator;
10 my $it = Test::Harness::Iterator->new(\*TEST);
11 my $it = Test::Harness::Iterator->new(\@array);
12
13 my $line = $it->next;
14
16 FOR INTERNAL USE ONLY!
17
18 This is a simple iterator wrapper for arrays and filehandles.
19
20 new()
21
22 Create an iterator.
23
24 next()
25
26 Iterate through it, of course.
27
28
29
30perl v5.8.8 2001-09-21 Test::Harness::Iterator(3pm)