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