Changed script to use CSV formatted input, rather than TSV.
This means that the script can directly process the CSV downloaded from Bugzilla, without any need to use Excel to convert it.
# $Id: UnicodeExt.pm,v 1.4 2003/07/30 13:39:23 matt Exp $
package XML::SAX::PurePerl::Reader;
use strict;
use Encode;
sub set_raw_stream {
my ($fh) = @_;
binmode($fh, ":bytes");
}
sub switch_encoding_stream {
my ($fh, $encoding) = @_;
binmode($fh, ":encoding($encoding)");
}
sub switch_encoding_string {
Encode::from_to($_[0], $_[1], "utf-8");
}
1;