t/span.t

   1 use HTML::Zoom;
   2 use Test::More tests => 1;
   3
   4 my $zoom = HTML::Zoom->from_html('<p>Hello my name is <span id="name" /></p>');
   5 my $html = $zoom->select('#name')->replace_content('Foo foo')->to_html;
   6 is($html, '<p>Hello my name is <span id="name">Foo foo</span></p>');