如何在Perl中指定WE8MSWIN1252编码？

我正在使用Perl，希望使用以下编码对字符串进行编码：WE8MSWIN1252

我试过了

$output =encode('WE8MSWIN1252',$string)

但它的投掷错误

知道如何指定这种编码WE8MSWIN1252吗？

WE8MSWIN1252是Oracle指定的

使用编码qw编码； my$bytes=编码为'Windows-1252'，$ucp；又名“cp-1252”又名“cp1252” $ucp预计将被解码为文本，即Unicode代码点字符串。

WE8MSWIN1252是Oracle指定的

使用编码qw编码； my$bytes=编码为'Windows-1252'，$ucp；又名“cp-1252”又名“cp1252”

---

$ucp应为解码文本，即Unicode代码点字符串。

可以在找到所有编码的代码。可以在找到所有编码的代码。