Select Code to Download

    my $ssh = new Net::Telnet (
        -fhopen          => $pty,
...
[root@hyd1658 attribute_template]# perl test_centos.pl 
output is Thu Jul  4 11:18:18 IST 2019
 [root@hyd1658 ~]

    my $ssh = new Net::Telnet (
        -fhopen          => $pty,
...
Output of script execution
[root@hyd1658 attribute_template]# perl test_centos.pl 
output is [root@hyd1658 ~]

sub cmd {
.
...
.
.