在Perl中，可以使用Crypt::Perl模塊來進行加密和解密操作。該模塊提供了一系列加密算法和函數，包括DES、AES、RSA等。以下是一個簡單的示例代碼，演示如何使用Crypt::Perl模塊進行加密和解密操作：
use Crypt::Perl;
my $data = "Hello, world!";
my $key = "mysecretkey";
# Encrypt data
my $encrypted = Crypt::Perl::encrypt($data, $key);
print "Encrypted data: $encrypted\n";
# Decrypt data
my $decrypted = Crypt::Perl::decrypt($encrypted, $key);
print "Decrypted data: $decrypted\n";
需要注意的是，加密和解密的過程都需要使用相同的密鑰。另外，Crypt::Perl模塊提供了多種加密算法和選項，可以根據具體需求選擇不同的加密方式。具體可以參考Crypt::Perl模塊的文檔進行更詳細的了解。
