# Pastebin h3IhqGef
raku -MRed -e '

model Person {
    has Int $.id    is id;
    has Str $.name  is column;
    has Int $.age   is column;
    has Str $.email is unique;
}


red-defaults "SQLite";

Person.^create-table;

for [
    %(:1id, :name<Alice>, :30age, :email<alice@example.com>),
    %(:2id, :name<Bob>,   :25age, :email<bob@example.com>  ),
] -> %data {
    Person.^create: |%data
}

say "\nAll entries: ";
.say for Person.^all;

say "\nEntries with name starting with `A`:";
.say for Person.^all.grep: *.name.starts-with: "A";
'