Select Code to Download

join ('', map { "$i  <li>$_</li>\n" . hash_to_html ($x->{$_}, "$i    "
+) } sort (keys (%$x)))

join ('', map { "$i  <li>$_\n" . hash_to_html ($x->{$_}, "$i    ")."$i
+  </li>" } sort (keys (%$x)))