The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
# subclass for testing customizing & subclassing

package MyIteratorFactory;

use strict;
use vars '@ISA';

use MyCustom;
use MyIterator;
use TAP::Parser::IteratorFactory;

@ISA = qw( TAP::Parser::IteratorFactory MyCustom );

sub make_iterator {
    my $class = shift;
    return MyIterator->new(@_);
}

1;