# Pastebin X5Krp5IQ
raku -I. -MRed -e '

model User is table<users> is rw is export {
    has Int $.id is serial;
    has Str $.username is unique;
    has Str $.password is column;
    has Str $.email is unique;
    has DateTime $.registration-date is column{ :type<timestamptz> } = DateTime.now;
    has Bool $.disabled is column = False;
}

red-defaults "SQLite";


User.^create-table;

my $*RED-DEBUG = True;

say User.^all.first: *.email eq "bla"

'
SQL : SELECT
   users.id , users.username , users.password , users.email , users.registration_date as "registration-date", users.disabled 
FROM
   users
WHERE
   users.email = 'bla'
LIMIT 1
BIND: []
Nil