Help for this page

Select Code to Download


  1. or download this
    use strict;

my $cmd="netstat >>C:\\perl-program\\test2\\netstat_ouput.txt";
...
  TCP    WXP-DPBG8BS:1448       localhost:1447         ESTABLISHED
  TCP    WXP-DPBG8BS:5354       localhost:1054         ESTABLISHED
  TCP    WXP-DPBG8BS:27015      localhost:1440         ESTABLISHED
  2. or download this
    port found:3743

...
port found:3746

..............