Help for this page
#!/usr/bin/perl ... } print "value $d[0][0][0] path $d[0][0][1]\n";
value 8 path 1 + 2 + 4 + 1