Select Code to Download

my $hPipe = createFile( $PIPE_NAME, "rwe" )
    or die "Can't read from [$PIPE_NAME]: $^E\n";
...
OsFHandleOpen( PIPE, $hPipe, "rw" )
    or die "Can't associate Perl handle: $! ($^E)\n";
use strict 'subs';