my $pipe = new Win32::Pipe( 'testpipe', 10000 );