in reply to UTF-8 issues with Perl in general and with Spreadsheet::WriteExcel
use Encode; while (<IN>) { $count ++; chomp ($_); $worksheet->write("A$count", decode('utf8',$_)); } close IN; [download]