in reply to How can I write Test::Finished?

I think the best way to fix this is in a different layer -- in the harness.

Make Test::Harness understand a magical 0..__END__ plan, and then expect a __END__ line, then EOF, and consider Bad Things to have happened if the output ends with no __END__ line in sight, or, conversely, if there is output past the __END__.

Warning: Unless otherwise stated, code is untested. Do not use without understanding. Code is posted in the hopes it is useful, but without warranty. All copyrights are relinquished into the public domain unless otherwise stated. I am not an angel. I am capable of error, and err on a fairly regular basis. If I made a mistake, please let me know (such as by replying to this node).

In Section Seekers of Perl Wisdom