For your and your friend's approach, look into http://IPC::Open2, and maybe to Expect.pm for Unixy systems.

But for telnet, I'd bypass the external commands and use Net::Telnet. The relevant chapter in Lincoln Stein's book Network Programming with Perl is online.