in reply to Win32::SerialPort with ActivePerl
You may be able to use createFile from Win32API::File.