Select Code to Download

sub Make_shiftedKey ($) {
    my $self  = shift;
...
    $self->{S_KEY} = $s_key;
    return $s_key;
}