http://qs321.pair.com?node_id=361652


in reply to Multiline comments

It's time for @#$! multiline comments in perl!

Yeah yeah, I know ...

q`<!-- --------------------------- <region-function_docs> main: - name : DoFoo desc : do some foo usage: DoFoo($optional_greeting); </region-function_docs> --------------------------- -->`if(000); sub DoFoo{ my $optional_greeting = shift || 'Hello World'; print "$optional_greeting\n"; print "we are now doing foo\n"; print "\n"; }###end_sub

So just write your code like that and problem (solved?).

Update: this workaround option parses free of warnings and errors, but is unsuitable for serious use in perl.