Another WTDI:
The s/// line is the line that does the actual "encryption".sub foo { my @copy = @_; for (@copy) { my $counter; s/(.)/chr ++$counter + ord $1/ge; } return @copy; } print foo('asdf');
- Yes, I reinvent wheels.
- Spam: Visit eurotraQ.
In reply to Re: Silly "encryption".....just for fun ;)
by Juerd
in thread Silly "encryption".....just for fun ;)
by Guitarded
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |