Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
                                                                          
    +          
    ...
    my $result2 = decrypt($data2);
    print "Decrypted(1): $result1\n";
    print "Decrypted(2): $result2\n";
    
  2. or download this
    Encrypted(1): Qf9g4cqQ/6xXgqvcPLJA6u9PZ4jPgegPrsBCsFaPch3LDsaN6TjN6xjL
    +jebw4yPFNO2rEBTUgISSkiX1v2Aelt4qmHFcd6nF
    Encrypted(2): qymmKtF/LXb+HIZe6ZCFS8xtLadYkS+09dZ8zxAvL+r9Rw+GjkeBMc8y
    +e++Yl/s/DxJppvKQm2ToJ78mENTuxcc8fUMrKdZbHuWGiMBxgK0=
    Decrypted(1): Here we go
    Decrypted(2): Here we go