5 2_fill_19_complex.t - Test CGI::Ex::Fill's regex against difficult tags (with embeded html)
10 use Test::More tests => 2;
12 use_ok('CGI::Ex::Fill');
15 <input attr="<br value='waw'>
16 <br>" type="hidden" name="foo1">
19 my %fdat = (foo1 => 'bar1');
22 CGI::Ex::Fill::form_fill(\$string,
26 ok($string =~ m/ value="bar1"/,
27 "Should match ($string)");