How about using Net::Telnet? This module is usually used to connect to a different host using telnet, and remote control the programs (send commands, grab their output), but you can of course remote control localhost too.