Select Code to Download

      1 #!/usr/bin/perl -w
      2 
...
     44 
     45   }
     46 }

Use of uninitialized value in concatenation (.) at ./chkport.pl line 4
+0.
localhost FAILED to repond on telnet 
Can't use an undefined value as a symbol reference at ./chkport.pl lin
+e 43.