Yet Another CPAN Grep

Piper ( E/EH/EHLERS/Piper-0.05.tar.gz, EHLERS, 2018; MetaCPAN )

Piper/t/05_Instance_Pipe.t ( view source; MetaCPAN )

                  }

                    for my $FAIL (@{$set->{fail}}) {
                        isnt(
                            $FAIL->find_segment($loc),
                            $exp,

L->isnt_exhausted, 'empty - isnt_exhausted');

            $SMALL->enqueue(2);

            ok(!$SMALL->is_exhausted, 'queued - is_exhausted');
            ok($SMALL->isnt_exhausted, 'queued - isnt_ex

$SMALL->isnt_exhausted) {
                $SMALL->dequeue;
            }

            ok($SMALL->is_exhausted, 'emptied - is_exhausted');
            ok(!$SMALL->isnt_exhausted, 'emptied - isnt_exhaus

Piper ( E/EH/EHLERS/Piper-0.05.tar.gz, EHLERS, 2018; MetaCPAN )

Piper/xt/author/05_Instance_Pipe.t ( view source; MetaCPAN )

                  }

                    for my $FAIL (@{$set->{fail}}) {
                        isnt(
                            $FAIL->find_segment($loc),
                            $exp,

L->isnt_exhausted, 'empty - isnt_exhausted');

            $SMALL->enqueue(2);

            ok(!$SMALL->is_exhausted, 'queued - is_exhausted');
            ok($SMALL->isnt_exhausted, 'queued - isnt_ex

$SMALL->isnt_exhausted) {
                $SMALL->dequeue;
            }

            ok($SMALL->is_exhausted, 'emptied - is_exhausted');
            ok(!$SMALL->isnt_exhausted, 'emptied - isnt_exhaus

Piper ( E/EH/EHLERS/Piper-0.05.tar.gz, EHLERS, 2018; MetaCPAN )

Piper/t/04_Instance_Process.t ( view source; MetaCPAN )

ok(!$TEST->isnt_exhausted, 'empty - isnt_exhausted');

        $TEST->enqueue(3);

        ok(!$TEST->is_exhausted, 'queued - is_exhausted');
        ok($TEST->isnt_exhausted, 'queued - isnt_exhausted

   while ($TEST->isnt_exhausted) {
            $TEST->dequeue;
        }

        ok($TEST->is_exhausted, 'emptied - is_exhausted');
        ok(!$TEST->isnt_exhausted, 'emptied - isnt_exhausted');

Piper ( E/EH/EHLERS/Piper-0.05.tar.gz, EHLERS, 2018; MetaCPAN )

Piper/xt/author/04_Instance_Process.t ( view source; MetaCPAN )

ok(!$TEST->isnt_exhausted, 'empty - isnt_exhausted');

        $TEST->enqueue(3);

        ok(!$TEST->is_exhausted, 'queued - is_exhausted');
        ok($TEST->isnt_exhausted, 'queued - isnt_exhausted

   while ($TEST->isnt_exhausted) {
            $TEST->dequeue;
        }

        ok($TEST->is_exhausted, 'emptied - is_exhausted');
        ok(!$TEST->isnt_exhausted, 'emptied - isnt_exhausted');