Here's one a co-worker of mine ran into the other day

package Foo;

# some code

=pod
some docs.

1;
[download]

/\/\averick
perl -l -e "eval pack('h*','072796e6470272f2c5f2c5166756279636b672');"