Select Code to Download

me@ubuntu01$ telnet 10.0.0.1 1234
Trying 10.0.0.1...
...
Escape character is '^]'.
SSH-2.0-OpenSSH_7.4

me@ubuntu01$ telnet 10.0.0.2 1235
Trying 10.0.0.2...

#!/usr/bin/perl
use warnings;
...
{
    print "failure.";
}

exists argument is not a HASH or ARRAY element or a subroutine at ./te
+lnetTest.perl line 22.

if(exists($telnetObj))