my $hPipe = createFile( $PIPE_NAME, "rwe" )
    or die "Can't read from [$PIPE_NAME]: $^E\n";

$^E = 0; # Clear possibly misleading errors out.
no strict 'subs';
OsFHandleOpen( PIPE, $hPipe, "rw" )
    or die "Can't associate Perl handle: $! ($^E)\n";
use strict 'subs';