perl enc.pl 

Create a password: secretpw
Enter your message to be encrypted: This is an encryption test

Your encrypted message: c7cda0cc55bde684b5db9698d5d6d7b0c9a9bde2d274e1dba6db