# Pastebin vw5rKJFD
sub add-level($args-str is copy, $message) {
    my ($level, $role-id) = ($args-str ~~ / (\d+) \s+ (\d+) /);
    say "Level " ~ $level ~ " is now tied to " ~ $role-id;
}