Perl Geek Code

-----BEGIN PERL GEEK CODE BLOCK-----
Version: 0.01
P+++>++++$c-->+P6-R++M+>++$O+++$MA++E+>
+++PU BD+C++D+S++$X WP?MO PP!n CO-PO-o
G
A-OLC+OLCC+OLJ+OLP--OLCO---OLS+OLL+OLA-
-Ee (++)Ev----Eon-Eot!Eob Eoa
uL+++uB!uS uH!uo!w-m osA 
------END PERL GEEK CODE BLOCK------

But what does it mean?

Copyright 1999, Zachary Miller (wolfgang@imsa.edu)