for my $file (@files)
{
    ...