@files = grep { ! /^\.\.?$/ } readdir $DIR;
[download]

would have been simpler and easier to understand. Also, your choice of $dir and $DIR as variable names could lead to confusion.

Cheers,

JohnGG

It worked for me ... what did you expect to see? (Though I would've used a simpler condition than you chose...)

...roboticus

Update: Specifically: !/^\.\.?$/

Hmmm ... why did you repost the same question? You've already got plenty of helpful answers there...

...roboticus