https://wp.jochen.hayek.name/blog-en/2014/02/21/encodeguess-guesses-encoding-from-data-in-perl/