What could be said with 50 times less bytes...
$ munpack -t message
part1 (text/plain)
part2 (text/html)
$ wc part?
30 23 881 part1
1448 2151 43829 part2
$ head part2
....<meta name=Generator content="Micros oft Word 11">...
$ perl -e 'printf "%.0f\n",43 829/881'
50
$ munpack -t message
part1 (text/plain)
part2 (text/html)
$ wc part?
30 23 881 part1
1448 2151 43829 part2
$ head part2
....<meta name=Generator content="Micros oft Word 11">...
$ perl -e 'printf "%.0f\n",43 829/881'
50