while(my ($subid) = $children->fetchrow_array) {
        walktree($subid);
    }