open my $out, '>', $fileOut or die "Can't create '$fileOut': $!\n";