Home | Gifts

Package =TWiki::LineIterator

Iterator over the lines in a file

On this page:

new( $file )

Create a new iterator over the given file. if the file cannot be opened, then there will be no elements in the iterator.

hasNext() -> $boolean

Returns false when the iterator is exhausted.

my $it = new TWiki::ListIterator(\@list);
while ($it->hasNext()) {
   ...

next() -> $data

Return the next line in the file.

The iterator object can be customised to pre- and post-process entries from the list before returning them. This is done by setting two fields in the iterator object:

For example,

my $it = new TWiki::LineIterator("/etc/passwd");
$it->{filter} = sub { $_[0] =~ /^.*?:/; return $1; };
$it->{process} = sub { return "User $_[0]"; };
while ($it->hasNext()) {
    my $x = $it->next();
    print "$x\n";
}

Revision r1 - 2008-01-22 - 03:21:24 - TWikiContributor Edit