The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use t::TestpQuery tests => 2;

use pQuery;

is ref(pQuery->end), 'pQuery', 'end works when no stack exists';

my $pq = pQuery('Foo <b>Bar</b> Baz');

is $pq->find('b')->each(sub { pass "One time" })->end->length, 3, 'end works';