for (@_) {
   do {
      # stuff to do here
   } while (/\.dat/);
}


##</code><code>##


for (@_) {
   if (/\.dat/) {
      # stuff to do here
   }
}