$|=1; print <<"EoF"; Content-type: multipart/x-mixed-replace; boundary=1234 --1234 Content-type: text/html

Test 123...

--1234 EoF sleep 2; print <<"EoF"; Content-type: text/html

Test 456...

--1234 EoF