Select Code to Download

sub obscure {
        my ( $self, $s ) = @_;
...

        return join '&', @temp;
}

sub obscure {
        my ( $self, $s ) = @_;
...
                }
                split /&/, $s;
}