$_ = <<"DOC"; s/^ //msg; print;
 =pod
 stuff here
 =cut
DOC
;;
=pod
stuff here
=cut