Commit | Line | Data |
---|---|---|
23ba49c7 | 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; | |
a88c1c57 | 6 | is($html, '<p>Hello my name is <span id="name">Foo foo</span></p>'); |