# Pastebin ofzplAXR $ perl6 -Ilib -e 'use Red; use attributes :D; model M is table { has Str $.a is column = "a"; has Int $.b is column = 2; has Int $.c is column = "c" } my $*RED-DB = database "SQLite"; my $*RED-DEBUG = True; M.^create-table; ' SQL : CREATE TABLE mmm( c integer NOT NULL, a varchar(255) NOT NULL, b integer NOT NULL )