ssh接続(Keep-Aliveが効かない)のセッションを維持する方法

仕事でLinuxサーバへssh接続している際いつの間にかセッションが切れる事があった。
サーバのOS側の設定はいじれないし、ターミナルソフトのKeep-Aliveを設定してもダメでいつの間にかセッションが切れる。

topコマンドなど表示が常に変わるような状況だとセッションを維持している様だったので、定期的にサーバからデータが送信されればいいんだなと妄想した。
色々試行錯誤して出来た物が下記、ちなみに使っているターミナルソフトはRLoginを使っています。
このRLoginにあるスクリプト機能で使っている物を載せておく。

Document.Open();
wait(CONNECT);
sopen(OPEN_LOOK);
swait(90, "$");
sputs("script -fa /var/tmp/$(date +%Y%m%d_%H)_$(whoami).log\r");
while ( sgets(100) != "" );
sputs("TZ=Asia/Tokyo\r");
while ( sgets(100) != "" );
sputs("date\r");
while ( sgets(100) != "" );
sputs("find /var/tmp/_$(whoami) -mtime +100 -exec ls -l {} \;\r");
while ( sgets(100) != "" );
sputs("find /var/tmp/_$(whoami) -mtime +100 -exec rm -f {} \;\r");
while ( sgets(100) != "" );
sputs("ps ux | grep \"[S]end_ACK.sh\" | awk '{ print \"kill -9\", $2 }'| sh\r");
while ( sgets(100) != "" );
sputs("echo \"while true; do echo -n $'\\006'; sleep 30; done\">Send_ACK.sh;sh Send_ACK.sh &\r");
while ( sgets(500) != "" );
sputs("rm Send_ACK.sh\r");
while ( sgets(100) != "" );
sclose();

不要な処理は削除して使ってみてください。