perl写的Socket程序，如何处理自定义的行结束符

koffman

perl默认的internet行结束符是\015\012，但是我们这里有一个用C写的server，它识别的结束符是\01A，所以我写的代码收发数据必须用\01A作为结束符才能正确处理，但是不论我用流方式处理还是用recv(),send()函数处理，都无法修改默认结束符，具体状态就是不接收server返回的信息，请问如何解决呢？