my $line;
my @lines;