XHTML-Instrumented
view release on metacpan or search on metacpan
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
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
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');
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 )