The source code of the PC1 cipher algo in Perl Not for export