$objPort = new Win32::SerialPort...;
$objPort->are_match("\n", "\r\n");
$foo = $objPort->lookfor;