2 <!DOCTYPE html PUBLIC
"-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
3 <html xmlns=
"http://www.w3.org/1999/xhtml">
5 <title>Test::Harness::Iterator - Internal Test::Harness Iterator
</title>
6 <meta http-equiv=
"content-type" content=
"text/html; charset=utf-8" />
7 <link rev=
"made" href=
"mailto:" />
10 <body style=
"background-color: white">
11 <table border=
"0" width=
"100%" cellspacing=
"0" cellpadding=
"3">
12 <tr><td class=
"block" style=
"background-color: #cccccc" valign=
"middle">
13 <big><strong><span class=
"block"> Test::Harness::Iterator - Internal Test::Harness Iterator
</span></strong></big>
17 <p><a name=
"__index__"></a></p>
22 <li><a href=
"#name">NAME
</a></li>
23 <li><a href=
"#synopsis">SYNOPSIS
</a></li>
24 <li><a href=
"#description">DESCRIPTION
</a></li>
27 <li><a href=
"#new__"><code>new()
</code></a></li>
28 <li><a href=
"#next__"><a href=
"file://C|\msysgit\mingw\html/pod/perlfunc.html#item_next"><code>next()
</code></a></a></li>
37 <h1><a name=
"name">NAME
</a></h1>
38 <p>Test::Harness::Iterator - Internal Test::Harness Iterator
</p>
42 <h1><a name=
"synopsis">SYNOPSIS
</a></h1>
44 use Test::Harness::Iterator;
45 my $it = Test::Harness::Iterator-
>new(\*TEST);
46 my $it = Test::Harness::Iterator-
>new(\@array);
</pre>
48 my $line = $it-
>next;
</pre>
52 <h1><a name=
"description">DESCRIPTION
</a></h1>
53 <p><strong>FOR INTERNAL USE ONLY!
</strong></p>
54 <p>This is a simple iterator wrapper for arrays and filehandles.
</p>
57 <h2><a name=
"new__"><code>new()
</code></a></h2>
58 <p>Create an iterator.
</p>
61 <h2><a name=
"next__"><a href=
"file://C|\msysgit\mingw\html/pod/perlfunc.html#item_next"><code>next()
</code></a></a></h2>
62 <p>Iterate through it, of course.
</p>
63 <table border=
"0" width=
"100%" cellspacing=
"0" cellpadding=
"3">
64 <tr><td class=
"block" style=
"background-color: #cccccc" valign=
"middle">
65 <big><strong><span class=
"block"> Test::Harness::Iterator - Internal Test::Harness Iterator
</span></strong></big>