# Pastebin vyYJ8B0U
% perl6 -I. -MRed -e '

my $*RED-DB = database "SQLite";
my $*RED-DEBUG = True;

model Bla { has Int $.id is id }

Bla.HOW does role :: { method table(|) { "my_table" } }

Bla.^create-table

'
SQL : CREATE TABLE my_table(
   id integer NOT NULL primary key 
)
BIND: []