use strict;
use warnings;
use Win32::Socketpair qw[ winopen2 ];

## Run the command and get a bi-direction pipe to it.
my $pipe = winopen2( 'PwrUsbCmd.exe 0 0 0' );
my @results = <$pipe>;
print $pipe "\n";
print @results;

##</code><code>##

PowerUSB is not connected
Enter to continue ## Here I have to press enter to exit from this EXE and it is not working.