Special Vars
$*RED-DB
This is the variable where Red stores the database connection.
use Red;
my $*RED-DB = database "SQLite";
You should use red-do()
and/or red-defaults()
instead.
$*RED-DEBUG
When this variable is set to a true-ish value Red will print the generated SQL
s to $*OUT
.
my $*RED-DEBUG = True;
Model.^create-table;
Output
SQL : CREATE TABLE model(
id integer NOT NULL primary key
)
BIND: []
$*RED-DEBUG-RESPONSE
When this variable is set to a true-ish value Red will print the response from the SQL query to $*OUT
.
my $*RED-DEBUG-RESPONSE = True;
Model.^create: :42id
Output
{id => 42}
$*RED-DEBUG-AST
When this variable is set to a true-ish value Red will print the generated AST
to $*OUT
.
my $*RED-DEBUG-AST = True;
Model.^create: :42id
Output
Red::AST::Insert:
id
$*RED-COMMENT-SQL
When this variable is set to a true-ish value Red will add comments about where in the code it was called on the SQL query
.
my $*RED-COMMENT-SQL = True;
Model.^create: :42id
$*RED-FALLBACK
Bool
, defines if Red should fallback to original methods if the Red one has failed.