$ cat sample.txt | perl -wnl -e '/\.X\-Intermail\-Unknown\-MIME\-Type\=unparsedmessag(e.*)/s and print $1;'