use Tree::Simple::VisitorFactory;
 
my $visitor = Tree::Simple::VisitorFactory->get("BreadthFirstTraversal");
$tree->accept($visitor);

print join ", " => $visitor->getResults();
# this prints : Building, House, Hut, Garage, Window, Door, Roof, Pizza, Door, Glas, Wood, Silicium