$class::doc=<<"__doc__";
=pod
docstring bla bvla

bla
=cut
__doc__