Or skip the ugly readdir() dance altogether. It's amazing how many people like going around their elbow to get to their thumb. Use glob() or the angle brackets, that's why they are there.

@files = grep { not -d } <$path/*>;
[download]