Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
use strict;
...
    }
} until ($result eq "END" or $result "end");
$| = 1;
  2. or download this
    #!/usr/bin/perl
#TCP Client code
...

}
$| = 1;