in reply to Do you have a Perl Geek Code?

No, but I help define the Perl value for the original geek code:
P+++++ I am Larry Wall, Tom Christiansen, or Randal Schwartz.