sockaddr_un($file) : sockaddr_un « Network « Perl

1. Perl
2. Network
3. sockaddr_un

sockaddr_un($file)

    

use Socket;

$file = 'transfer';

socket(SOCKET, PF_UNIX, SOCK_STREAM, 0) or die "Could not create socket.\n";

connect(SOCKET, sockaddr_un($file))  or die "Could not connect.\n";
    
print SOCKET "Hello from the client!\n";

close SOCKET;

exit;

   
    
    
    
  

Related examples in the same category