在Perl中進行網絡編程通常使用Socket模塊。以下是一個簡單的例子：
use strict;
use warnings;
use IO::Socket::INET;
my $host = 'localhost';
my $port = 12345;
# 創建一個socket
my $socket = new IO::Socket::INET (
PeerAddr => $host,
PeerPort => $port,
Proto => 'tcp',
) or die "無法連接到服務器: $!\n";
print "連接成功\n";
# 發送數據到服務器
my $data = "Hello, World!";
$socket->send($data);
# 接收來自服務器的數據
my $response;
$socket->recv($response, 1024);
print "來自服務器的響應: $response\n";
# 關閉socket
$socket->close();
以上代碼連接到本地主機的12345端口，并發送"Hello, World!"字符串到服務器。然后接收來自服務器的響應并打印出來。最后關閉socket連接。這只是一個簡單的例子，實際中的網絡編程可能會更加復雜和詳細。
