foreach $file(@lines);