$ perl -wle 'binmode(STDOUT, "encoding(cp1252)")||die; print "He said, \x{201C}I\x{2019}m r\x{E9}served.\x{201D}"' | uniquote --encoding cp1252
He said, \N{U+201C}I\N{U+2019}m r\N{U+E9}served.\N{U+201D}