[root@localhost Perl_Ping]# perl telnet.pl
Mon Aug 26 11:48:21 2013
Trying 192.168.1.150...
Connected to 192.168.1.150.
Escape character is '^]'.

User name: [root@localhost Perl_Ping]#