my $flag = 0;
my $row_out = 0;
for my $row ( $row_min .. $row_max ) {
    my @value = ();
   # my $flag = 0;
   # my $row_out = 0;