use strict;
use warnings;
use Win32::Pipe;
my $pipe = new Win32::Pipe("testPipe");
my $result = $pipe->Write("Howdy! This is cool!");
# ...