ayylmao.pl for weechat (modification of /kikoo)

##Ayy Lmao ( ͡° ͜ʖ ͡°) ##

weechat::register("ayy" ,"mrk", "0.2", "GPL", "send lame greetings on the current buffer (usage: /ayy nick)", "",
"");
weechat::hook_command("ayy", "", "", "", "", "ayy", "");


sub ayy
{
    my ($data, $buffer, $args) = @_;
    $front = int(rand(13))+1;
    $back = int(rand(13))+1;
    while($back == $front)
    {
    $back = int(rand(13))+1;
    }
    $xclam = int(rand(11))+2;
    $oo = int(rand(11))+2;
    $output = "\002\003" . "$front,$back" . " ayy lmao" . "o" x $oo . " $args " . "!" x $xclam . " ( ͡° ͜ʖ ͡°)";
    weechat::command($buffer, $output);
    return weechat::WEECHAT_RC_OK;
}