# Pastebin CWcYDy9P
model Film::Playlist { ... }

model Film {
    has Int $.id  is serial;
    has Str $.title is column;
    has DateTime $.btime is column .= now;

    has Film::Playlist @.playlist is relationship{ Film::Playlist.film_id };
}

model Film::Playlist is table<film_playlist> {
    has Int $.id  is serial;
    has Int $.film_id is column{ :references{Film.id} };
}
my $*RED-DB = database "SQLite";
Film.^create-table; Film::Playlist.^create-table;
Film.^create: :title<bla>;

my $first-film = Film.^all.sort(*.btime).head;
my $*RED-DEBUG = True;
$first-film.playlist.delete;