BEGIN { if ($some_condition) { require Win32::SerialPort; import Win32::SerialPort qw(:ALL); } else { require Device::SerialPort; import Device::SerialPort qw(:ALL); } }