Crypt::...DES_EDE(3)

🌸 NAME 🌸

Welcome to the Crypt::...DES_EDE(3) page from the User Contributed Perl Documentation, bestie 🌈. This one is all about Crypt::Cipher::DES_EDE — Symmetric cipher DES_EDE (aka Triple-DES, 3DES), key size: 192[168] bits. Iconic. 💅

---

🦋 SYNOPSIS 🦋

Okay so there are two example setups, and both are giving main character energy ✨:

### example 1
use Crypt::Mode::CBC;

my $key = '...'; # length must be a valid key size for this cipher
my $iv = '...';  # 16 bytes
my $cbc = Crypt::Mode::CBC->new('DES_EDE');
my $ciphertext = $cbc->encrypt("secret data", $key, $iv);

### example 2 (slower)
use Crypt::CBC;
use Crypt::Cipher::DES_EDE;

my $key = '...'; # length must be a valid key size for this cipher
my $iv = '...';  # 16 bytes
my $cbc = Crypt::CBC->new( -cipher=>'Cipher::DES_EDE', -key=>$key, -iv=>$iv );
my $ciphertext = $cbc->encrypt("secret data");

---

🎀 DESCRIPTION 🎀

Lowkey important: this module implements the DES_EDE cipher, and its interface is compatible with Crypt::CBC. 🫶

⚠️ Note: This module only implements single-block encryption and decryption. For general data, use a block mode such as Crypt::Mode::CBC, Crypt::Mode::CTR, or Crypt::CBC (which is slower).

---

💖 METHODS 💖

Unless noted otherwise, assume $c is an existing cipher object created via new, for example:

my $c = Crypt::Cipher::DES_EDE->new($key);

🌟 new 🌟

Makes a fresh cipher object, and the deets are literally right here:

my $c = Crypt::Cipher::DES_EDE->new($key);
#or
my $c = Crypt::Cipher::DES_EDE->new($key, $rounds);

# $key .... [binary string] key of an accepted length (see keysize, min_keysize, max_keysize)
# $rounds . [integer] optional, number of rounds (if supported by the cipher; croaks on invalid value)

So $key is a [binary string] key of an accepted length (peep keysize, min_keysize, max_keysize), and $rounds is an [integer] optional number of rounds (if supported by the cipher; croaks on invalid value) 🔥.

🔐 encrypt 🔐

Encrypts exactly one block of plaintext. The length of $plaintext must equal blocksize; croaks otherwise. An empty string is accepted and returned unchanged. No cap.

my $ciphertext = $c->encrypt($plaintext);

Returns the encrypted block as a binary string (raw bytes). ✨

🔓 decrypt 🔓

Decrypts exactly one block of ciphertext. The length of $ciphertext must equal blocksize; croaks otherwise. An empty string is accepted and returned unchanged.

my $plaintext = $c->decrypt($ciphertext);

Returns the decrypted block as a binary string (raw bytes). 💜

🧚 keysize 🧚

Just an alias for max_keysize. Periodt.

$c->keysize;
#or
Crypt::Cipher::DES_EDE->keysize;
#or
Crypt::Cipher::DES_EDE::keysize;

🍓 blocksize 🍓

Returns the cipher block size (in bytes).

$c->blocksize;
#or
Crypt::Cipher::DES_EDE->blocksize;
#or
Crypt::Cipher::DES_EDE::blocksize;

👑 max_keysize 👑

Returns the maximum key size (in bytes).

$c->max_keysize;
#or
Crypt::Cipher::DES_EDE->max_keysize;
#or
Crypt::Cipher::DES_EDE::max_keysize;

🌸 min_keysize 🌸

Returns the minimum key size (in bytes).

$c->min_keysize;
#or
Crypt::Cipher::DES_EDE->min_keysize;
#or
Crypt::Cipher::DES_EDE::min_keysize;

🌈 default_rounds 🌈

Returns the cipher's default round count.

$c->default_rounds;
#or
Crypt::Cipher::DES_EDE->default_rounds;
#or
Crypt::Cipher::DES_EDE::default_rounds;

---

⭐ SEE ALSO ⭐

• CryptX, Crypt::Cipher
• <https://en.wikipedia.org/wiki/Triple_DES>

---

Signed, sealed, delivered by perl v5.42.0 on 2026-05-11 🫶✨