馬鹿なことをしてみる
} elsif ($switch eq "007F") {
print "Recieved Sync\n";# if ($config{'debug'} >= 2);
$timeout{'play'}{'time'} = time;
$msg_size = 6;
sendchaosRedPod(\$remote_socket);　＜＝ここ

} elsif ($switch eq "0080") {

定期的に垢ポットを作るパケット