All,
I finally got the answer. The person who built our copy of Perl
found it. Although the statement "use open ':bytes';" would only
work on Dos/Windoze machines, there is a simple way to process
real binary data in a Unicode environment. For the record, the
answer is:
use bytes;
See:
http://www
peace of code:
[snip]
require Encode;
print Encode::is_utf8($tmp)? "Unicode string.\n":"None Unicode
tring.\n";
binmode STDOUT, ":utf8";
print "Text: '$tmp', tag name: '$name'\n";
print "Cool\n" if ($tmp =~ /<\/$name>/s);
print "Very Cool\n" if ($tmp
