Re: CipherText

[Steeeeeve]

This node falls below the community's threshold of quality. You may see it by logging in.

[lemming]

sub modifyKeys(){
  my $self = shift;
  my S_KEY = "";
  my $i, $x;
  For $x = 1 To length($self->{R_KEY})
    $i = ord(substr($self->{R_KEY}, $x, 1)) - 32
    S_KEY = S_KEY + chr(($i ^ $self->{RSORT}[$i] ^ $self->{ATT}) + 32)
  Next x
return S_KEY;
}

I have gobs of problems with "programmers" that don't check their work and repeat the same mistake over and over.