Select Code to Download

#!/usr/bin/perl

...
        return 0;
    };
};

#!/usr/bin/perl

...
    my @result = split(/\|/, $decrypted, 3);
    return \@result;
};