for my $line (@lines)