Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    
    ...
    close $ENCRYPTED_STRING;
    
    say $encrypted_string;
    
  2. or download this
    #!/usr/bin/perl
    use strict;
    ...
    
    $input =~ tr/abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ/nopq
    +rstuvwxyzabcdefghijklmNOPQRSTUVWXYZABCDEFGHIJKLM/;
    say $input;