NAME
Data::TreeDumper::Renderer::DHTML - DHTML renderer for Data::TreeDumper
SYNOPSIS
use
Data::TreeDumper ;
#-------------------------------------------------------------------------------
my
$style
;
my
$body
= DumpTree
(
GetData(),
'Data'
,
DISPLAY_ROOT_ADDRESS
=> 1,
DISPLAY_PERL_ADDRESS
=> 1,
DISPLAY_PERL_SIZE
=> 1,
RENDERER
=>
{
NAME
=>
'DHTML'
,
STYLE
=> \
$style
,
BUTTON
=>
{
COLLAPSE_EXPAND
=> 1,
SEARCH
=> 1,
},
},
) ;
<<EOT;
<?xml version=
"1.0"
encoding=
"iso-8859-1"
?>
<!DOCTYPE html
PUBLIC
"-//W3C//DTD XHTML 1.0 Strict//EN"
>
<html>
<!--
Automatically generated by Perl and Data::TreeDumper::DHTML
-->
<head>
<title>Data</title>
$style
</head>
<body>
$body
<p>
</p>
</body>
</html>
EOT
DESCRIPTION
Simple DHTML renderer for Data::TreeDumper.
Thanks to Stevan Little author of Tree::Simple::View for giving me the idea and providing some code I could snatch.
EXAMPLE
Check dhtml_test.pl for a complete example of two structure dumps within the same HTML file.
OPTIONS
Style
CSS style is dumped to $setup->{RENDERER}{STYLE} (a ref to a scalar) if it exists. This allows you to collect all the CSS then output it at the top of the HTML code.
my
$style
;
my
$body
= DumpTree
(
...
RENDERER
=>
{
NAME
=>
'DHTML'
,
STYLE
=> \
$style
,
},
) ;
{RENDERER}{NO_STYLE} removes style section generation. This is usefull when you defined your styles by hand.
my
$style
;
my
$body
= DumpTree
(
...
RENDERER
=>
{
NAME
=>
'DHTML'
,
NO_STYLE
=> 1,
},
) ;
Class
The output will use class 'data_tree_dumper_dhtml' for <li> and <ul>. The class can be renamed with the help of {RENDERER}{CLASS}. This allows you to dump multiple data structures and display them with a diffrent styles.
my
$style
;
my
$body
= DumpTree
(
...
RENDERER
=>
{
NAME
=>
'DHTML'
,
CLASS
=>
'my_class_name'
,
},
) ;
Glyphs
Data::TreeDumper outputs the tree lines as ASCII text by default. If {RENDERER}{NO_GLYPH} and RENDERER}{NO_STYLE} are defined, no lines are output and the indentation will be the default <li> style. If you would like to specify a specific style for your tree dump, defined you own CSS and set the appropriate class through {RENDERER}{CLASS}.
Expand/Collapse
Setting {RENDERER}{COLLAPSED} to a true value will display the tree collapsed. this is false by default.
$setup
->{RENDERER}{COLLAPSED}++ ;
If {RENDERER}{BUTTON}{COLLAPSE_EXPAND} is set, the rendered will add a button to allow the user to collapse and expand the tree.
$setup
->{RENDERER}{BUTTON}{COLLAPSE_EXPAND}
Search
If {RENDERER}{BUTTON}{SEARCH} is set, the rendered will add a button to allow the user to search the tree. This is a primitive search and has no other value than for test.
Bugs
I'll hapilly hand this module over to someone who knows what he does :-)
Check the TODO file.
EXPORT
None
AUTHORS
Khemir Nadim ibn Hamouda. <nadim@khemir.net>
Staffan Maahlén.
Copyright (c) 2003 Nadim Ibn Hamouda el Khemir and
Staffan Maahlén. All rights reserved.
This program is free software; you can redistribute
it and/or modify it under the same terms as Perlitself.
If you find any value in this module, mail me! All hints, tips, flames and wishes are welcome at <nadim@khemir.net>.
SEE ALSO
Data::TreeDumper.
1 POD Error
The following errors were encountered while parsing the POD:
- Around line 669:
Non-ASCII character seen before =encoding in 'Maahlén.'. Assuming CP1252