my $lines = 0;
my $files = 0;