Bug #62497 for Win32-Unicode: Win32::Unicode::Console::printW fails quietly after call to IPC::System::Simple::capturex

Win32::Unicode::Console::print fails quietly after call to IPC::System::Simple::capturex. After call to capturex the stdout handle changes and then printW causes "The handle is invalid" error; test.pl ============= use warnings; use strict; use IPC::System::Simple qw(capturex); use Win32::Unicode::Console; my $output = `chcp`; print "backticks test start\n"; print $output; printW $output; print "backticks test end\n"; $output = capturex('chcp.com'); print "capturex test start\n"; print $output; printW $output; print "capturex test end\n"; ============= output =============== backticks test start Active code page: 866 Active code page: 866 backticks test end capturex test start Active code page: 866 capturex test end ============== perl -v ========= This is perl 5, version 12, subversion 2 (v5.12.2) built for MSWin32-x64-multi-thread (with 8 registered patches, see perl -V for more detail) Copyright 1987-2010, Larry Wall Binary build 1202 [293621] provided by ActiveState http://www.ActiveState.com Built Sep 6 2010 22:53:42 Perl may be copied only under the terms of either the Artistic License or the GNU General Public License, which may be found in the Perl 5 source kit. Complete documentation for Perl, including FAQ lists, should be found on this system using "man perl" or "perldoc perl". If you have access to the Internet, point your browser at http://www.perl.org/, the Perl Home Page. ========== IPC::System::Simple: 1.21 Win32::Unicode: 0.24 OS: Microsoft Windows [Version 6.1.7600] Thanks, Andriy