while (@file_contents) {  $totalline++; }