Thanks for your explanation. Was able to work around this by opening files with the FILE_SHARE_DELETE permission as you using Win32API::File and it does seem to do the trick. Replaced the thread code with: 

    my $tid = threads->tid;
    my $fn = "file" . $tid;

    my $winFileHandle = createFile( $fn, "w", "d" ) or die "$!/$^E";
    OsFHandleOpen(*OUTPUT, $winFileHandle, "w") or die "$!/$^E";
    
    my $pid = open(my $pipe, "-|", "perl test.pl");
    
    print OUTPUT $_ while(<$pipe>);

    close(OUTPUT);
    close($pipe);
    CloseHandle($winFileHandle);

[download]

I do however have another question, well more of a clarification. So in my actual usage, I am using a threadpool and a Thread::Queue and not starting/joining threads after one another. But, I'm just making sure I understand correctly, this does not matter because if I have for example:

  1. thread 1 open file1
  2. thread 2 start process A while file1 is still open
  3. thread 1 closes file1
process A will still have a filehandle for file1 even though thread2 did absolutely nothing with the file because the spawned process inherits ALL of the the file handles currently in use by the main perl process at the time of opening the pipe? Sorry if this comes out more as just paraphrasing what you said, just wanting to make sure I understand fully :)

Thanks for the help!

In reply to Re^2: Multithreaded script keeps files locked when reading output from multiple processes on Windows by rmahin
in thread Multithreaded script keeps files locked when reading output from multiple processes on Windows by rmahin

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.