Perl script that tallies up the count of ASCII, extended ASCII and UTF-8 characters in a file