3 use Test::More skip_all => "Totally doesn't work yet";
5 my $z = HTML::Zoom->from_html(<<HTML);
8 <div id="foo"><p/></div>
13 my @list = qw(foo bar baz);
14 my $iter = sub { shift @list };
16 $z->select("#foo")->repeat(sub {
17 my $e = $iter->() or return;
18 return sub { $_->select("p")->replace_content($e) };