foreach (readdir DIR) {
# do stuff
}

##</code><code>##

foreach (readdir DIR) {
...
push(@array, $_);
...
}
foreach (@array) {
# do stuff
}