代码之家 › 专栏 › 技术社区 › chenyf

如何在汉字和英文字符之间插入空格?

perl6 regex

7

chenyf · 技术社区 · 6 年前

我有一个陈述,其中中文和英文是相邻的:

æLove Perl 6åå

我想在中文和英文之间插入一个空格:

æ Love Perl 6 åå

我搜索那个 \u4e00-\u9fa5 代表汉字:

'å' ~~ /<[\u4e00..\u9fa5]>/

但这会导致:

Potential difficulties:
Repeated character (0) unexpectedly found in character class
at line 2
------> 'å' ~~ /<[\u4e00..\âu9fa5]>/

那么如何匹配汉字呢?

1 回复 | 直到 6 年前

1

13

Brad Gilbert 6 年前

\u

> "\u4e00"
===SORRY!=== Error while compiling:
Unrecognized backslash sequence: '\u'
------> "\âu4e00"

\x

> "\x4e00"
ä¸

> 'ã ' ~~  /<[\x4e00..\x9fa5]>/ 
Nil

> 'ã ' ~~  /<:Han>/
ï½¢ã ï½£

# store in $0 and $1
say S/(<:Han>)(<:Latin>)/$0 $1/ given 'æLove Perl 6åå'
say S{(<:Han>)(<:Latin>)} = "$0 $1" given 'æLove Perl 6åå'
# same with subst
say 'æLove Perl 6åå'.subst: /(<:Han>)(<:Latin>)/, {"$0 $1"}

# only match between the two
say S/<:Han> <( )> <:Latin>/ / given 'æLove Perl 6åå'
say S{<:Han> <( )> <:Latin>} = ' ' given 'æLove Perl 6åå'

s/// .=subst

my $v = 'æLove Perl 6åå';

$v ~~ s/(<:Han>)(<:Latin>)/$0 $1/;
$v ~~ s{(<:Han>)(<:Latin>)} = "$0 $1";
$v ~~ s/<:Han> <()> <:Latin>/ /;

$v .= subst: /(<:Han>)(<:Latin>)/, {"$0 $1"};
$v .= subst: /<:Han> <()> <:Latin>/,' ';

<( )>

S/<:Han> <( )> [ <!:Han> & <!space> ]/ /