The next issue I had was that Win32::SerialPort's ->read appears to be behaving non-blocking

It's actually just timing out immediately - adding the minimum of e.g. $port->read_const_time(1000); sets the read timeout to 1s.