*** CSV.pm	2005-04-21 09:38:56.068664120 -0500
--- CSV-patched.pm	2005-04-15 13:34:29.685806656 -0500
***************
*** 136,142 ****
  
      # at least one argument was given for "combining"...
      for $column (@part) {
!       if ($column =~ /[^\t\040-\176]/) {
  
  	# an argument contained an invalid character...
  	$self->{'_ERROR_INPUT'} = $column;
--- 136,142 ----
  
      # at least one argument was given for "combining"...
      for $column (@part) {
!       if ($column =~ /[^\t\040-\375]/) {
  
  	# an argument contained an invalid character...
  	$self->{'_ERROR_INPUT'} = $column;
***************
*** 303,309 ****
  	$ok = 1;
  	last;
        }
!     } elsif ($$line_ref =~ /^[\t\040-\176]/) {
  
        # a tab, space, or printable...
        $$piece_ref .= substr($$line_ref, 0 ,1);
--- 303,309 ----
  	$ok = 1;
  	last;
        }
!     } elsif ($$line_ref =~ /^[\t\040-\375]/) {
  
        # a tab, space, or printable...
        $$piece_ref .= substr($$line_ref, 0 ,1);