{"body":"my %COMMANDS =\n    rank => &rank,\n    add-level => &add-level,\n    rm-level => &rm-level,\n    list-levels => &list-levels,\n    purge-roles => &purge-roles,\n;\n\nsub handle-command($message, $trimmed-message) is export {\n    $trimmed-message ~~ /(\\S+) [ \\s+ (.*) ]?/;\n\n    my $command = $/[0];\n    if %COMMANDS{$command} -> $sub {\n        $sub($/[1] // '', $message)\n    }\n}","name":"","extension":"txt","url":"https://www.irccloud.com/pastebin/rpYODJkQ","modified":1553862788,"id":"rpYODJkQ","size":371,"lines":16,"own_paste":false,"theme":"","date":1553862788}