一千萬個為什麽

搜索

如何從Perl正則表達式生成所有可能的排列?

我知道你可以使用 glob算法:: Permute - 但是如何從正則表達式生成所有可能的排列?

我想這樣做:

@perms = permute( "/\s[A-Z][0-9][0-9]/" );
sub permute( $regex ) {
    # code - put all permutations of above regex in a list
    return @list;
}

最佳答案

請參閱第6.5節(PDF)。 //hop.perl.plover.com/book/“rel =”nofollow noreferrer“>高階Perl 。考慮購買印刷書:這是一件藝術品。

There is also Regexp::Genex on CPAN.

轉載註明原文: 如何從Perl正則表達式生成所有可能的排列?