or download this
printf "TFD> count is '%s'\n", $count;
printf "TFD> path[count] is '%s'\n", $::path[$count];
printf "TFD> direntry[count] is '%s'\n", $::direntry[$count];
printf "TFD> FileLabel is '%s'\n", $::FileLabel;
printf "TFD> DirLabel is '%s'\n", $::DirLabel;