I use Net::Telnet for this.

Not real secure, mind you. And Expect is probably better for all but trival stuff.

Peace,
-McD