相关疑难解决方法(0)

为什么现代Perl默认会避免使用UTF-8?

我想知道为什么使用Perl构建的大多数现代解决方案默认情况下不启用UTF-8.

我知道核心Perl脚本存在许多遗留问题,可能会破坏它们.但是,从我的角度来看,在21 的世纪,新的大项目(或具有大的方面讲项目)应该从头开始他们的软件UTF-8的证明.我仍然没有看到它发生.例如,Moose启用严格和警告,但不启用Unicode.Modern :: Perl也减少了样板,但没有UTF-8处理.

为什么?是否有一些理由在2011年的现代Perl项目中避免使用UTF-8?


评论@tchrist太长了,所以我在这里添加它.

似乎我没有说清楚.让我尝试添加一些东西.

tchrist和我看到情况非常相似,但我们的结论完全是相反的.我同意,Unicode的情况很复杂,但这就是为什么我们(Perl用户和编码人员)需要一些层(或编译指示),这使得UTF-8处理变得像现在一样容易.

tchrist指出要涵盖的许多方面,我会阅读并思考它们几天甚至几周.不过,这不是我的观点.tchrist试图证明没有一种方法"启用UTF-8".我没有太多的知识可以与之争辩.所以,我坚持住实例.

我和Rakudo一起玩,UTF-8就在我需要的地方.我没有任何问题,它只是奏效了.也许在某些地方存在一些限制,但一开始,我测试的所有工作都按照我的预期进行.

这不应该是现代Perl 5的目标吗?我更强调一点:我不是建议将UTF-8作为核心Perl的默认字符集,我建议可以为那些开发项目的人快速触发它.

另一个例子,但更负面的语气.框架应该使开发更容易.几年前,我尝试过Web框架,但只是把它们扔掉了,因为"启用UTF-8"是如此模糊.我没有找到如何以及在何处挂钩Unicode支持.这是非常耗时的,我发现它更容易走老路.现在我看到这里有一个赏金来处理与梅森 2 相同的问题:如何让Mason2 UTF-8干净?.因此,它是一个非常新的框架,但使用UTF-8需要深入了解其内部.这就像一个大红色标志:停止,不要使用我!

我真的很喜欢Perl.但处理Unicode是痛苦的.我仍然发现自己在墙上奔跑.某种方式tchrist是正确的,并回答我的问题:新项目不吸引UTF-8,因为它在Perl 5中太复杂了.

unicode perl utf-8

555
推荐指数
6
解决办法
10万
查看次数

使用Perl进行Unicode方式的清单

我正在帮助客户将他们的Perl平面文件公告板网站从ISO-8859-1转换为Unicode.

由于这是我第一次,我想知道以下"清单"是否完整.一切都在测试中很好用,但我可能会遗漏一些只会在极少数情况下发生的事情.

这是我到目前为止所做的事情(请原谅我只包括"摘要"代码示例):

  1. 确保文件始终以UTF-8读写:

    use open ':utf8';
    
    Run Code Online (Sandbox Code Playgroud)
  2. 确保收到CGI输入为UTF-8(该站点未使用CGI.pm):

    s{%([a-fA-F0-9]{2})}{ pack ("C", hex ($1)) }eg;    # Kept from existing code
    s{%u([0-9A-F]{4})}{ pack ('U*', hex ($1)) }eg;     # Added
    utf8::decode $_;
    
    Run Code Online (Sandbox Code Playgroud)
  3. 确保文本打印为UTF-8:

    binmode STDOUT, ':utf8';
    
    Run Code Online (Sandbox Code Playgroud)
  4. 确保浏览器将我的内容解释为UTF-8:

    Content-Type: text/html; charset=UTF-8
    <meta http-equiv="content-type" content="text/html;charset=UTF-8">
    
    Run Code Online (Sandbox Code Playgroud)
  5. 确保表单发送UTF-8(只要设置了页面编码,可能不需要):

    accept-charset="UTF-8"
    
    Run Code Online (Sandbox Code Playgroud)
  6. 不要认为我需要以下内容,因为内联文本(菜单,标题等)仅以ASCII格式显示:

    use utf8;
    
    Run Code Online (Sandbox Code Playgroud)

这看起来合理还是我错过了什么?

编辑:我可能还应该提到,我们将运行一次性批处理来读取所有现有的文本数据文件并将其保存为UTF-8编码.

unicode perl utf-8

19
推荐指数
2
解决办法
2692
查看次数

open:utf8 pragma如何在perl中工作 - 与CPAN模块有关?

我已经阅读了下一篇文章:

但可能错过了一些BASIC积分.

使用

use open(:utf8);
Run Code Online (Sandbox Code Playgroud)

影响cpan模块呢?例如,当某个CPAN模块打开任何文件时,它将打开:utf8?这个陈述是真的吗?(或者open pragma只是词法范围?)AFAIK - 它也影响模块,但是以"不一致"的方式...(可能是模块的问题).

open pragma效果opendir吗?- 我已经尝试过的 - - 我仍然需要额外decode的所有文件名来源readdir(除了NFC).所以,IO :: Dir是不同的东西 - open pragma不包含什么?

影响开放的pragma sockets,管道呢?(例如什么是IO :: Handle?)

所有(或大多数)CPAN模块都知道何时进行i/o他们需要怎么做(utf8或lattin1或raw?)(可能不是,因为一个简单的autodie不适用于openpragma ...... :()

在许多地方,我可以阅读类似的规则:记住Unicode的规范规则:始终在应用程序的边缘编码/解码.这是一个很好的规则 - 但应用程序边缘意味着:我自己的源代码.CPAN模块(通常)也在边缘之后 - 不仅仅是"外部世界",如系统或网络......

根据我的经验,我的短脚本(大量使用CPAN)的内容的3/4包含:顶级声明,以及几乎所有的几十种编码/解码/ NFC ......

例如:即使是日志记录工具,也需要显式编码

use Log::Any qw($log);
use Log::Any::Adapter ('File', 'file.log');
$log->error( encode('utf-8', "tökös"));
Run Code Online (Sandbox Code Playgroud)

甚至,当想要添加tie到我的代码时,需要 …

perl

11
推荐指数
1
解决办法
553
查看次数

标签 统计

perl ×3

unicode ×2

utf-8 ×2