XHTML-Instrumented

 view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

lib/XHTML/Instrumented/Form/ElementControl.pm
lib/XHTML/Instrumented/Form/Hidden.pm
lib/XHTML/Instrumented/Form/Option.pm
lib/XHTML/Instrumented/Form/Select.pm
lib/XHTML/Instrumented/Loop.pm
Makefile.PL
MANIFEST			This list of files
META.yml
README
t/args.t
t/cdata.t
t/changes.t
t/checkbox.t
t/checkbox_loop.t
t/checkbox_loop2.t
t/coverage.t
t/entry.t
t/eqloop.t
t/file.t
t/filter.t
t/for.t

SIGNATURE  view on Meta::CPAN

SHA1 240ddb09c552ed9df1310828eb2d03ef19bef085 lib/XHTML/Instrumented/Form.pm
SHA1 735a764c1a325ec6c3448933f147e6a3a44b96cd lib/XHTML/Instrumented/Form/Checkbox.pm
SHA1 8c05b1baac48379cc5e2b95280a339cb4690623b lib/XHTML/Instrumented/Form/Control.pm
SHA1 5632624e518e75f453a8001708f3cb877db2f339 lib/XHTML/Instrumented/Form/Element.pm
SHA1 92da841ea510884ad3d71d4fa4e0a9b430f2d1a6 lib/XHTML/Instrumented/Form/ElementControl.pm
SHA1 ddb535bfefa8af8ff0fa1110650ca2f3186b71f9 lib/XHTML/Instrumented/Form/Hidden.pm
SHA1 2952d334f562c203d16911cf86d6d25c1e24243b lib/XHTML/Instrumented/Form/Option.pm
SHA1 b0fecf82336e1f2d13006c670f4301311af9b01c lib/XHTML/Instrumented/Form/Select.pm
SHA1 aeadb3b68db04254b5f4dba342b8e1d7cd41ccef lib/XHTML/Instrumented/Loop.pm
SHA1 1e81bebc1e41c7dcd1e1f6dca5055ac025b1794e t/args.t
SHA1 10fc7fb290106cfbb6b266caa0ad4253a63f5f58 t/cdata.t
SHA1 f95eb9bd37ddab4b8ca2672f1248fe2dd452bb83 t/changes.t
SHA1 5d4c7d5824a934644b29b398aa5b14bd3620ba57 t/checkbox.t
SHA1 1e6e289d1b1f8320495ca58b5cf772d8360cb438 t/checkbox_loop.t
SHA1 72db95f4d13a848e59fb1c0454b18bd9b10ac897 t/checkbox_loop2.t
SHA1 e778a528a812f288fe3e822489859f8508de09d8 t/coverage.t
SHA1 d7e9a198032f32e74089fefcc994bd9aa7892916 t/entry.t
SHA1 5d794e30612c84d13c5724f49d0aecf43525cf98 t/eqloop.t
SHA1 552b82e5bb5459c2a8c7a44f29df8f3c902277bb t/file.t
SHA1 5ee733e13de031ed5252e4899ca891ebff146354 t/filter.t
SHA1 923295ff298e388d47b1a4e6401fd263c2330697 t/for.t

t/mm.t  view on Meta::CPAN


Test::XML->import();
Test::XML::Order->import();

require_ok( 'XHTML::Instrumented' );

my $data = <<DATA;
<div>
 <div id="row">
   <span id="column">
     <a id="cdata">one</a>
   </span>
 </div>
</div>
DATA

my $t = XHTML::Instrumented->new(name => \$data, type => '');

my $output = $t->output(
    row => $t->loop(  headers => [ 'text', 'column' ], 
		      data => [
		          ['text one', $t->loop( headers => ['cdata'], data => [['one one'], ['one two']] )], 
		          ['text two', $t->loop( headers => ['cdata'], data => [['two one'], ['two two']] )], 
		      ]
		   ),
);

my $cmp = <<DATA;
<div>
  <div id="row">
    <span id="column.1">
      <a id="cdata.1.1">one one</a>
      <a id="cdata.1.2">one two</a>
    </span>
    <span id="column.2">
      <a id="cdata.2.1">two one</a>
      <a id="cdata.2.2">two two</a>
    </span>
  </div>
</div>
DATA

is_xml($output, $cmp, 'loop in loop');
is_xml_in_order($output, $cmp, 'loop in loop');

t/mm2.t  view on Meta::CPAN


Test::XML->import();
Test::XML::Order->import();

require_ok( 'XHTML::Instrumented' );

my $data = <<DATA;
<div>
 <div id="row">
   <span id="column">
     <span id="cdata">one</span>
   </span>
 </div>
</div>
DATA

my $t = XHTML::Instrumented->new(name => \$data, type => '');

my $output = $t->output(
    row => $t->loop(  headers => [ 'text', 'column' ], 
		      data => [
		          ['text one', $t->loop( headers => ['cdata'], data => [['one one'], ['one two']] )], 
		          ['text two', $t->loop( headers => ['cdata'], data => [['two one'], ['two two']] )], 
		      ],
		      inclusive => 1,
		   ),
);

my $cmp = <<DATA;
<div>
 <div id="row.1">
   <span id="column.1">
     <span id="cdata.1.1">one one</span>
     <span id="cdata.1.2">one two</span>
   </span>
 </div><div id="row.2">
   <span id="column.2">
     <span id="cdata.2.1">two one</span>
   
     <span id="cdata.2.2">two two</span>
   </span>
 </div>
</div>
DATA

is_xml($output, $cmp, 'loop in loop');

$output = $t->output(
    row => $t->loop(  headers => [ 'text', 'column' ], 
		      data => [
		          ['text one', $t->loop( headers => ['cdata'], data => [['one one'], ['one two']], inclusive => 1 )], 
		          ['text two', $t->loop( headers => ['cdata'], data => [['two one'], ['two two']], inclusive => 1 )], 
		      ],
		      inclusive => 1,
		   ),
);

$cmp = <<DATA;
<div>
 <div id="row.1">
   <span id="column.1.1">
     <span id="cdata.1.1">one one</span>
   </span><span id="column.1.2">
     <span id="cdata.1.2">one two</span>
   </span>
 </div><div id="row.2">
   <span id="column.2.1">
     <span id="cdata.2.1">two one</span>
   </span><span id="column.2.2">
     <span id="cdata.2.2">two two</span>
   </span>
 </div>
</div>
DATA

is_xml($output, $cmp, 'loop in loop');
is_xml_in_order($output, $cmp, 'loop in loop');

t/multiloop.t  view on Meta::CPAN


require_ok( 'XHTML::Instrumented' );

my $data = <<DATA;
<div>
 <div id="row">
  <div id="xxx">
    <span id="junk">junk</span>
    <span id="xunk">xunk</span>
    <span id="column">
      <span id="cdata">one</span>
    </span>
    <span id="text">one</span>
  </div>
 </div>
</div>
DATA

my $t = XHTML::Instrumented->new(name => \$data, type => '');

my $output = $t->output(
    row => $t->loop(  inclusive => 0,
                      headers => [ 'text', 'column' ], 
		      data => [
		          ['text one', $t->loop( headers => ['cdata'], data => [['one one'], ['one two']] )], 
		          ['text two', $t->loop( headers => ['cdata'], data => [['two one'], ['two two']] )], 
		      ]
		   ),
);

my $cmp = <<DATA;
<div>
 <div id="row">
  <div id="xxx.1">
    <span id="junk.1">junk</span>
    <span id="xunk.1">xunk</span>
    <span id="column.1">
      <span id="cdata.1.1">one one</span>
      <span id="cdata.1.2">one two</span>
    </span>
    <span id="text.1">text one</span>
  </div>
  <div id="xxx.2">
    <span id="junk.2">junk</span>
    <span id="xunk.2">xunk</span>
    <span id="column.2">
      <span id="cdata.2.1">two one</span>
      <span id="cdata.2.2">two two</span>
    </span>
    <span id="text.2">text two</span>
  </div>
 </div>
</div>
DATA

is_xml($output, $cmp, 'loop in loop');

t/multiloop2.t  view on Meta::CPAN

plan tests => 2;

require_ok( 'XHTML::Instrumented' );

my $data = <<DATA;
<div>
 <div id="row">
   <span id="junk">junk</span>
   <span id="text">one</span>
   <span id="column">
     <span id="cdata">one</span>
   </span>
 </div>
</div>
DATA

my $t = XHTML::Instrumented->new(name => \$data, type => '');

my $output = $t->output(
    row => $t->loop(  inclusive => 1,
                      headers => [ 'text', 'column' ], 
		      data => [
		          ['text one', $t->loop( headers => ['cdata'], data => [['one one'], ['one two']] )], 
		          ['text two', $t->loop( headers => ['cdata'], data => [['two one'], ['two two']] )], 
		      ]
		   ),
);

my $cmp = <<DATA;
<div>
  <div id="row.1">
    <span id="junk.1">junk</span>
    <span id="text.1">text one</span>
    <span id="column.1">
      <span id="cdata.1.1">one one</span>
      <span id="cdata.1.2">one two</span>
    </span>
  </div>
 <div id="row.2">
    <span id="junk.2">junk</span>
    <span id="text.2">text two</span>
    <span id="column.2">
      <span id="cdata.2.1">two one</span>
      <span id="cdata.2.2">two two</span>
    </span>
  </div>
</div>
DATA

is_xml($output, $cmp, 'loop in loop');



( run in 0.691 second using v1.01-cache-2.11-cpan-454fe037f31 )