Perl能不能写自己的网络协议

1e0n

我学校网络是用dr.com登陆程序的，我用perl写了个登陆器后发现还有问题。是这样的，登陆上了，但是dr.com在应用程序和tcp协议间加入了个“协议”，加了个数据头，暂时叫“dr.com协议”啦。如下(一层一层往下，我不知道怎么编辑这个帖子……)：
                 ___________
                 |应用程序data|     应用层
                 |__________|
                        |
           _______________
           |dr头|应用程序data |     dr.com
           |___|___________|
                        |
________________________
|tcp头/udp头|dr头|应用程序data|      传输层
|_________|___|__________|
tcp和udp都是这样加的数据(dr头数据在这里就是44 72 63 6f 3d 8e 72 4a a0 03 ac 13 08 77 00 00，中间那两位可变化的)，只不过tcp把dr头数据加了push压入数据先发送了，而且只在数据流前面加了dr头，udp没有分段（其实是因为udp 不可能分段）。

现在的问题是怎么编程加入这样个“协议”？？我是在linux下的，因为想学linux又上不了网才来分析dr.com。

各位帮我想象办法了～～

原文在https://www.xfocus.net/bbs/index.php?act=ST&f=2&t=43668Dr.com连网方式研究

我去找了好久perl的模块都找不到这样的功能。

alchemy

Perl是可以写协议的,但是我看不懂你上面说的是什么

dnathink

alchemy?是不是Ldream大虾？