print scalar @lines, "\n";