open my $OUT, '>', "$out.out" or die "open failed: $!\n";