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