collapse '/' initial path item when fake-root is givenarch

Before, "/foo/bar/baz" would result in:

	["fakeroot", "/", "foo", "bar", baz"]
	fakeroot///foo/bar/baz

After:

	["fakeroot", "foo", "bar", baz"]
	fakeroot/foo/bar/baz

1 files changed, 3 insertions, 0 deletions

diff --git a/treeify b/treeify
index fe892af..24356b9 100755
--- a/treeify
+++ b/treeify
@@ -216,6 +216,9 @@ if ($opt{path}) {
 }
 
 if ($opt{fakeroot}) {
+	while ($tree->{"/"}) {
+		$tree = $tree->{"/"}
+	}
 	$tree = {$opt{fakeroot} => $tree};
 }