Simple Perl script to encrypt data by XORing all bits by an input key value. Assignment for Systems Programming Languages