{"body":"method purge-messages($cmd-obj) {\n    my %payload = $cmd-obj.payload;\n    my $channel = %payload<channel>;\n\n    my $how-many = $cmd-obj.args;\n    unless $how-many ~~ / <(\\d+)> / { return content => 'You must provide an Int value for this command.'; }\n    my @messages = (await $channel).fetch-messages($how-many);\n    return content => @messages;\n}","name":"","extension":"txt","url":"https://www.irccloud.com/pastebin/gsqHrZul","modified":1561907421,"id":"gsqHrZul","size":348,"lines":9,"own_paste":false,"theme":"","date":1561907421}