Perl/Tk conflict with piped open

[Parker, Jonathan T.]

Greetings,

When I run the following program under cygwin:
#!/usr/bin/perl
use Tk;
my $pid = open(README, "ls |");
while (<README>) {
    print "Test: " . $_;
}
close(README);


I get the following response:
$ jtp.open2.pl
      4 [main] perl 5596 C:\Programs\cygwin\bin\perl.exe: *** fatal
error - couldn't release memory 0x9C4000(1032192) for
'C:\Programs\cygwin\usr\X11R6\bin\cygX11-6.dll' alignment, Win32 error
487
   4655 [main] perl 5624 child_copy: loaded dll data write copy failed,
0x6258C000..0x6258C140, done 0, windows pid 2287828, Win32 error 5
panic: MUTEX_LOCK (45) [util.c:2266] at ./jtp.open2.pl line 4.
panic: MUTEX_LOCK (45) [op.c:354].


Cygcheck is attached.


I isolated this error from a larger program I was assigned to bring up
to date. I suspected that I had confused my environment with different
versions of perl, but after removing all other versions I can think of,
the problem persists. I deleted and reinstalled cygwin. No help. Other
simplified versions of "open" work ok.

I can make little from the error messages.

Any help would be appreciated.

Jonathan Parker

-------------- next part --------------
A non-text attachment was scrubbed...
Name: cygcheck.out
Type: application/octet-stream
Size: 24457 bytes
Desc: not available
URL: <http://cygwin.com/pipermail/cygwin/attachments/20060307/5245e2b1/attachment.obj>
-------------- next part --------------
--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Problem reports:       http://cygwin.com/problems.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/