NAME

Crypt::Enigma - Perl implementation of the Enigma cipher

SYNOPSIS

  use Crypt::Enigma;

  $enigma = Crypt::Enigma->new(
		'RotorIII', 'RotorII', 'RotorI', 'aaz', '0 0 0' 'ReflectorB' );


  # Encode the plaintext
  $cipher_text = $enigma->cipher( $plain_text );

  # Decode the ciphertext 
  $plain_text = $enigma->cipher( $cipher_text );

DESCRIPTION

See the documentation that came with the Crypt::Enigma package for more information.

EXPORT

None by default.

AUTHOR

Alistair Mills, <lt>cpan@alizta.com<gt>