Crypt::OOEnigma::Commercial

A commercial Enigma machine circa 1940.
Download

Crypt::OOEnigma::Commercial Ranking & Summary

Advertisement

  • Rating:
  • License:
  • Perl Artistic License
  • Price:
  • FREE
  • Publisher Name:
  • Steve Baker
  • Publisher web site:
  • ftp://mama.indstate.edu/linux/tree

Crypt::OOEnigma::Commercial Tags


Crypt::OOEnigma::Commercial Description

A commercial Enigma machine circa 1940. Crypt::OOEnigma::Commercial is a commercial Enigma machine circa 1940.SYNOPSIS use Crypt::OOEnigma::Commercial; my $enigma = new Crypt::OOEnigma::Commercial; # or use Crypt::OOEnigma::Commercial; use Crypt::OOEnigma::Rotor; my @rotors = (); # Populate the list of Crypt::OOEnigma::Rotor Crypt::OOEnigma::Commercial->new( rotors => ); # or even use Crypt::OOEnigma::Commercial; use Crypt::OOEnigma::Rotor; use Crypt::OOEnigma::Reflector; my @rotors = () # Populate the list of Crypt::OOEnigma::Rotor my $reflector = new Crypt:OOEnigma::Reflector(params); # see relevant pod Crypt::OOEnigma::Commercial->new( rotors => , reflector => $reflector); my $cipher = $enigma->encipher($mesg); my $decode = $enigma->encipher($cipher); # self-inverse # Also, for use internally: $enigma->init(); # returns the rotors to their initial stateThis module provides a commercial Enigma machine consisting of a number of rotors and a reflector. If no Rotors are provided in the constructor, 3 default Rotors are used, each of which uses an identity substitution (ie no cipher at all in each rotor in start position 0).Normally, you should create your own rotors and use those. See the documentation for Crypt::OOEnigma::Rotor for details. Requirements: · Perl


Crypt::OOEnigma::Commercial Related Software