Password Protect an Expression with Encrypt

Encrypt a message using the simple password "Shiver me timbers!", yielding an EncryptedObject.

In[1]:=

secretMessage = Encrypt["Shiver me timbers!", "I buried a stash of gold somewhere."]

Out[1]=

The data is now encrypted.

In[2]:=

InputForm[secretMessage]

Out[2]//InputForm=

Decrypt the data using the same password.

In[3]:=

Decrypt["Shiver me timbers!", secretMessage]

Out[3]=