小编Dɑv*_*vïd的帖子

我在哪里可以找到语言+地区代码列表?

我用Google搜索了(好吧,实际上是DuckDuckGo),直到我脸色发青,但找不到该类型en-GBfr-CA任何地方的语言代码列表.

有关组件的优秀资源,特别是W3C I18n页面,但我希望有一个简单的字母列表,如果可能的话,这是相当规范的(类似这一个).找不到.

谁能指出我正确的方向?非常感谢!

unicode iso internationalization region

51
推荐指数
3
解决办法
4万
查看次数

如何在第n次发生针时在PHP中拆分字符串?

必须有一种快速有效的方法在针的"第n"次出现时分割(文本)字符串,但我找不到它.PHP手册中的strpos注释中有一套相当完整的函数,但这似乎对我需要的东西有点多.

我有纯文本$string,并希望在第n次出现时拆分它$needle,在我看来,needle它只是一个空格.(我可以做理智检查!)

有人能指出我正确的方向吗?非常感谢!

php string

23
推荐指数
4
解决办法
2万
查看次数

我应该如何用usort键对这个数组进行排序?

我想我可能已经阅读usort过StackOverflow上的每篇文章,但我无法解决这个问题.这可能usort不是我需要的工具吗?这里有一些我正在使用的数组(我将其分配给$allPages):

Array
(
    [0] => Page Object
        (
            [id] => 4
            [slug] => articles
            [created_on] => 2009-08-06 07:16:00
        )

    [1] => Page Object
        (
            [id] => 99
            [slug] => a-brief-history
            [created_on] => 2011-04-25 12:07:26
        )

    [2] => Page Object
        (
            [id] => 98
            [slug] => we-arrive
            [created_on] => 2011-04-24 13:52:35
        )

    [3] => Page Object
        (
            [id] => 83
            [slug] => new-year
            [created_on] => 2011-01-02 14:05:12
        )
)
Run Code Online (Sandbox Code Playgroud)

我最终试图对created_on价值进行分类,但就目前而言,我决定能够对它们中的任何一个进行排序!当我尝试普通cmp($a, $b)类型回调时 …

php arrays key usort multidimensional-array

5
推荐指数
1
解决办法
691
查看次数

在DATA和ARGV文件句柄上进行Perl UTF-8编码

我有一些文本文件,其中包含许多Unicode希伯来语和希腊语,需要将它们包含在HTML <span class ="hebrew">...</span>元素中.这些文件属于已运行多年的项目.

大约八年前,我们成功地使用这个Perl脚本来完成这项工作.

#!/usr/bin/perl

use utf8;

my $table = [
  {
    FROM  => "\\x{0590}",
    TO    => "\\x{05ff}",
    REGEX => "[\\x{0590}-\\x{05ff}]",
    OPEN  => "<span class =\"hebrew\">",
    CLOSE => "</span>",
  },
  {
    FROM  => "\\x{0370}",
    TO    => "\\x{03E1}",
    REGEX => "[\\x{0370}-\\x{03E1}]|[\\x{1F00}-\\x{1FFF}]",
    OPEN  => "<span class =\"greek\">",
    CLOSE => "</span>",
  },
];

binmode(STDIN,":utf8");
binmode(STDIN,"encoding(utf8)");

binmode(STDOUT,":utf8");
binmode(STDOUT,"encoding(utf8)");

while (<>) {

  my $line = $_;

  foreach my $l (@$table) {

    my $regex          = $l->{REGEX},
    my ($from, $to)    = ($l->{FROM},$l->{TO});
    my ($open, $close) …
Run Code Online (Sandbox Code Playgroud)

unicode perl utf-8

3
推荐指数
1
解决办法
517
查看次数