BEGIN {
   eval(
      $^O eq 'MSWin32
         ? 'use Win32::SerialPort; 1'
         : 'use Device::SerialPort; 1'
   ) or die $@;
}