use Encode;  # add this near the top, with the other "use" statements

...

# write to spreadsheet, close excel

$sheet -> write ( 0, 0, decode( 'utf8', $writestring )); # add the "decode()" call