use Unicode::String qw(utf8); print utf8(" '$cell_contents'")->as_string;