Proof of concept of enumeration from a string

gistfile1.txt

use v6.*;

sub char-classify(Str:D $string) {
    my @elements = $string.comb.map: {
        RakuAST::Regex::CharClassEnumerationElement::Character.new($_)
    }
    RakuAST::QuotedRegex.new(
      body    => RakuAST::Regex::Assertion::CharClass.new(
        RakuAST::Regex::CharClassElement::Enumeration.new(:@elements)
      )
    ).EVAL
}

my $foo = char-classify("abcd");

say "a" ~~ $foo;  # ｢a｣
say "e" ~~ $foo;  # Nil