主页 / user-6293949

Richard Hainsworth's questions

Martin Hope
Richard Hainsworth
Asked: 2025-04-22 19:01:12 +0800 CST
  • 8

HTTP 请求的响应是一个类似这样的字符串 'one=iwejdoewde&two=ijijjiiij&three=&four=endinghere'

我想把这个查询放入哈希表中。我的解决方案是

my $s = 'one=iwejdoewde&two=ijijjiiij&three=&four=endinghere';
my %h = $s.comb(/<-[&]>+/).map({ my @a = .split(/\=/); @a[0] => @a[1] }) ;
say %h;
#                                                                                   
# {four => endinghere, one => iwejdoewde, three => , two => ijijjiiij}
#

我觉得这个$s看起来%h很丑。不过，它处理three=片段时不会中断。

似乎应该有更好的方法，特别是根据的结果来配对split。

这似乎对单个对有用：

my $s='one=two';
say $s.match( / (.+) \= (.*) / ).pairup

但把它放进去.map会导致意想不到的结果

my $s = 'one=iwejdoewde&two=ijijjiiij&three=&four=endinghere';
my %h = $s.comb(/<-[&]>+/).map( *.match(/ (.+) \= (.*) /).pairup )
say %h;
#
# {one    iwejdoewde => (｢two｣ => ｢ijijjiiij｣), three      => (｢four｣ => ｢endinghere｣)}
#
http
Martin Hope
Richard Hainsworth
Asked: 2024-07-25 20:48:08 +0800 CST
  • 7

我在模块中有一个枚举定义AAA：

enum RDProcDebug <None All AstBlock BlockType Scoping Templates MarkUp>;

class Debug {
  method foo(RDProcDebug @ds) {
    for @ds { say .key ~ ' => ' ~ .value }
  }
}

在 Raku 程序中，这种方法很有效，例如

use AAA;
my RDProcDebug $rp .= new;
$r.foo(AstBlock, BlockType);

但是现在我需要从命令行提供调试元素的名称，它只能提供 Str，例如

$ RDOpts='AstBlock BlockType' raku myprog

# and in myprog
if %*ENV<RDOpts>:exists {
  $rp.debug( %*ENV<RDOpts> ); # this does not work
}

那么如何将 Str 列表转换为枚举 RDProcDebug 类型的列表？

enums