perl -p -0 -e 's/(?