perl: add a trivial streaming test program

This came out of working on this debugging session:
https://github.com/unbit/uwsgi/issues/567