素人です。教えてください。

(スレ立てるまでもない第5弾にも投稿したのですが…)
(こちらの方が、より技術的なレスがくると思い再投稿します)

今まで作業上、
TeraTermを用いてIP経由(TCPポートは任意。仮に6001)でリモートアクセスサーバに
接続後、TeraTermのbreak信号を送出(Alt+b)して遠隔端末にして使っていました。

これと同等のことをperlで実行したいと考えているのですが、
方法がいまいちわかりません。

IO::Socket::INETでソケット作ってそれにbreak信号を流すことで
実現できると考えているのですが、ブレーク信号って具体的にはどうやって送るんだろ?
というところで行き詰まっております。

ex.) printf <$SOCKET_hoge> "break信号??"; # という感じかなーと。

それとももっと別の良い方法があるのでしょうか?

ご指導のほどよろしくお願いします。