foreach $file (@files)
{
   open FILE, $file;
   . . .
   close FILE;
   unlink $file;
}