Help for this page

Select Code to Download


  1. or download this
    !beer|give to $nick one beer|cheers $nick
  2. or download this
    open(INF,"test.irc");
    @ary=<INF>;
...
        $conn->privmsg($conn->{channel}, "$txt_chan");
    }
}
  3. or download this
    [00:13] <boilera> !beer
[00:13] * Curolina give to $nick one beer
[00:13] <Curolina> cheers $nick
  4. or download this
    [00:13] <boilera> !beer
[00:13] * Curolina give to boilera one beer
[00:13] <Curolina> cheers boilera