s/\s+//g,eval''.join'',map+chr(hex),split/P/for$b; [download]
Makeshifts last the longest.
In reply to Re: perl rules by Aristotle in thread perl rules by tos