雷博尔分析规则：如何纠正规则分隔段落

我想分析如下命令系列：雷博尔分析规则：如何纠正规则分隔段落

orders-series: {Wordpress Profiles 
    Blogger is a User 
    Admin is a Blogger 
    Author is a Blogger 
    Subscriber is a User 

    Blogger Role 
    Blogger Manage Posts 


    Admin Roles 
    Admin Manage Site 
    Manage Site Include Manage Users 
    Manage Site Include Manage Themes 
    Manage Site Include Manage Plugins 
    } 

    orders-block: copy [] 
    newline2: rejoin [newline newline] 
    rule: [ 
    [some [copy orders to newline2 (append orders-block orders) thru newline2]] 
    | copy orders to end (append orders-block orders) 
    ] 
    parse orders-series rule 
    write clipboard:// mold orders-block

我在剪贴板

[{Wordpress Profiles 
Blogger is a User 
Admin is a Blogger 
Author is a Blogger 
Subscriber is a User} "Blogger Role^/Blogger Manage Posts"]

得到这个，而我想获得这

[{ 
    Wordpress Profiles 
    Blogger is a User 
    Admin is a Blogger 
    Author is a Blogger 
    Subscriber is a User 
    } 
    { 
    Blogger Role 
    Blogger Manage Posts 
    }  
    { 
    Admin Roles 
    Admin Manage Site 
    Manage Site Include Manage Users 
    Manage Site Include Manage Themes 
    Manage Site Include Manage Plugins 
    }]

我该如何修改我的分析规则？

谢谢。

来源

2009-09-12 Rebol Tutorial

我用稍微不同的方法：

REBOL [] 

orders-series: {Wordpress Profiles 
    Blogger is a User 
    Admin is a Blogger 
    Author is a Blogger 
    Subscriber is a User 

    Blogger Role 
    Blogger Manage Posts 


    Admin Roles 
    Admin Manage Site 
    Manage Site Include Manage Users 
    Manage Site Include Manage Themes 
    Manage Site Include Manage Plugins 
} 

char-cr-lf: charset [ 
    #"^(00)" - #"^(09)" #"^(0B)" - #"^(0C)" #"^(0E)" - #"^(FF)" 
] 

an-order: [ 
    [ 
    some [ 
     some [char-cr-lf] newline 
    ] 
    ] 
] 

rule: [ 
    (orders-block: copy []) 
    [ 
    any [copy order an-order (append orders-block order) [ any newline | end]] 
    ] 
] 

parse orders-series rule

我怀疑，这两个文件的和Henrik的解决方案将通过附加被绊倒Blogger管理员额和管理员角色之间的空白行。

来源

2009-09-14 15:10:59

感谢您的回答，请尝试。 – 2009-11-01 19:55:28

只要删除|在...前面副本...

来源

2009-09-14 14:29:32

我觉得这个工作太：

orders: [] 

parse orders-series [ 
    any [ 
     newline 
     | copy txt [to "^/^/" | to end] (append orders trim txt) "^/" 
    ] 
]

来源

2009-09-14 14:35:01

雷博尔分析规则：如何纠正规则分隔段落

回答

相关问题