$ perl -MData::Peek -wE'say $^O;DPeek ("\x{201c}"); DPeek ("\x{201d}")'
os390
PV("\312\101\160"\0) [UTF8 "\x{201c}"]
PV("\312\101\161"\0) [UTF8 "\x{201d}"]