# Pastebin 9ANBwwo1
% perl6 -I. -MRed -e '

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

model Bla { has Int $.id is id }

sub set-conf-table($name) { Bla.HOW does role :: { method table(|) { $name } }; Bla }

my \Conf = set-conf-table("another_name");

Conf.^create-table

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