{"body":"perl6 -I. -MRed -e '\nmy $*RED-DB = database \"SQLite\";\n\nmodel Bla { has $!id is serial; has Int $.number is rw is column }\n\nBla.^create-table;\n\nmy $*RED-DEBUG = True;\n\nBla.^all.grep(*.id > 10).map({ .number ~= \"bla\" }).save\n\n'\nSQL : UPDATE bla SET\n   number = bla.number || 'bla'\nWHERE bla.id > 10\n\nBIND: []","name":"","extension":"txt","url":"https://www.irccloud.com/pastebin/bnZOPXOs","modified":1572530208,"id":"bnZOPXOs","size":306,"lines":17,"own_paste":false,"theme":"","date":1572530208}