Yes, it uses ord/chr; but I'm happy with the outcome.
The design goal was to replace my email .sig, which is currently based on my perlmonks .sig and is therefore going to become out-of-date when
localtime rolls over in three weeks.
I'd like to give thanks to I0 for the factoring code.
$_='daniel@coder.com 519-575-3733 /Prescient Code Solutions/ coder.c
+om
';s/-/ /g;s/([.@])/ $1/g;@y=(42*1476312054+7*3,14120504e4,-42*330261-3
+3,
42*5436+3,42*2886+10,42*434987+5);s/(.)/ord(uc($1))/ge;for(@x=split/32
+/;
@y; map{print chr} split /(..)/, shift(@x) + shift(@y)) {perlmonk.da.r
+u}