если хочешь, то могу дать два скрипта на perl - один потребуется запустить снаружи, другой - локально. потом запустить локальный - он повиснет на каком-нибудь port, а потом другой - он попытается послать на этот порт.