if ($charset && (lc($charset) ne 'utf-8')) { 
  eval { $output = encode($charset, $output); };
  croak($@) if $@;  
}
elsif ($charset && (lc($charset) eq 'utf-8')) { 
  eval { $output = encode('utf8', $output); };
  croak($@) if $@;
}