I may be misunderstanding but...

@dir = </users/temp/test1>;
push @dir, </users/temp/test1/test2>;
@dir = grep !/^\.$/, @dir;
[download]

though that will only work in perl 5.6.0 and above, I belive.... or if you wanted them in separate dirs it should be obvious enough how to change that

                - Ant
                - Some of my best work - Fish Dinner