Help for this page

Select Code to Download


  1. or download this
        

#!/usr/bin/env perl 
...
print $socket "ls:$dir\n"; 
 
close($socket);
  2. or download this
            

#!/usr/bin/env perl  
...
} 
 
close($socket);