Дерево:: Простой Вид:::: DHTML является классом Perl для того, чтобы рассмотреть Дерево:: Простые иерархии в DHTML.

РЕЗЮМЕ

используйте Дерево:: Простой Вид:::: DHTML;

## простой пример

# используйте значения по умолчанию (неупорядоченный список без CSS)
мой $tree_view = Дерево:: Простой Вид:::: DHTML-> новый ($tree);

## более сложные примеры

# использование свойств CSS
мой $tree_view = Дерево:: Простой Вид:::: DHTML-> новый ($tree => (
list_type => "упорядоченный",
list_css => "стиль списка: круг;",
list_item_css => "семейство шрифтов: курьер;",
expanded_item_css => "семейство шрифтов: курьер; вес шрифта: полужирный",
link_css => "текстовое художественное оформление: ни один;"
));

# использование классов CSS
мой $tree_view = Дерево:: Простой Вид:::: DHTML-> новый ($tree => (
list_css_class => "myListClass",
list_item_css_class => "myListItemClass",
expanded_item_css_class => "myExpandedListItemClass",
link_css_class => "myListItemLinkClass"
));

# смешивание свойств CSS и классов CSS
мой $tree_view = Дерево:: Простой Вид:::: DHTML-> новый ($tree => (
list_css => "стиль списка: круг;",
list_item_css => "семейство шрифтов: курьер;",
expanded_item_css_class => "myExpandedListItemClass",
link_css_class => "myListItemLinkClass"
# форматируйте сложные узлы функцией
node_formatter => sub {
мой ($tree) = _;
возвратитесь "". $tree-> getNodeValue ()-> описание (). "";
},
# добавьте радио-элемент кнопки к дереву
# с именем tree_id
radio_button => tree_id
));

# распечатайте javascript nessecary для DHTML
# функциональные возможности этого дерева
печатайте $tree_view-> javascript ();

# распечатайте дерево, полностью расширенное
печатайте $tree_view-> expandAll ();

# распечатайте дерево, расширенное вдоль данного пути (см. ниже за детали),
печатайте $tree_view-> expandPath ("Корень", "Ребенок", "Внук");