 |
User since: |
Apr 14, 2000 at 00:12 UTC
(25 years ago) |
Last here: |
Jun 05, 2001 at 01:21 UTC
(24 years ago) |
Experience: |
563
|
Level: | Monk (7) |
Writeups: |
42
|
Location: | Coventry, UK |
User's localtime: |
Feb 07, 2025 at 10:16 +01
|
Scratchpad: |
View
|
For this user: | Search nodes |
|
This is just a variant on something I posted to obfuscated
code, but to find my email address, run this:
use strict;$_=' RZzqDaL ^IYt}WigMQo r|FD}Ms `UVwIIj';my @w=my $z=lengt
+h()>>1;
$_=join'',map { (/\s/)?' ':chr(ord($_)^++$z) } split //; while (/[xX]/
+) {push
@w, scalar(join '', map {$z=1;join '', grep {$z&&((/[A-Z]/&&(($_.='x')
+||1))||
($z=0))}split//}split/\s/);s/\s[A-Z]+/ /g;tr/[A-Z][a-z]/[a-z][A-Z]/;}$
+_=(join
' ',@w[1..$#w]);s/[xX ]//g;$_=lc;tr/[yz]/[.@]/; print; print "\n"; ###
+# Email
|