Select Code to Download

# Bredth first listing of all nodes under given root (incl. root).
#
...
my $id = getId($NODE);

$retitle_nodes->( 'new_title_var_goes_here', getNodeById($id)->{title}
+, $get_children->($id) );