#snip of highlander.t
  my $generated_html = ptree($tree, "$root.gen");
  is ($generated_html, File::Slurp::read_file("$root.exp"), "HTML for $age");