Remove the first \r.
In reply to (tye)Re: modem handling in perl by tye in thread modem handling in perl by tmbg