Multi-server IRC bot in Perl (6+5). "It's here. It's ready. Use it!"
reddit / irc

----------------------------------------------------------------------
raiph · 2016-07-30 03:27

(Edited to clarify I'm not the author of the module or article.)

The module's author (who goes by Zoffix among various other nicks) ran
this minimalist example:

    use IRC::Client;
    .run with IRC::Client.new:
        :nick<MahBot>
        :host<irc.freenode.net>
        :channels<#perl6>
        :debug
        :plugins(class { method irc-to-me ($_) { .text.uc } })

resulting in this exchange on #perl6:

    <Zoffix> MahBot, I ♥ you!
    <MahBot> Zoffix, I ♥ YOU!

----------------------------------------------------------------------
rkos · 2016-07-30 11:17

Neat. I once tried making an irssi script that would function as a
bot, it was tough to get started out but eventually I managed to get
it to handle 200+ simultaneous connections, update a html page to show
where it was connected and cycle a /whois through all the connections
on command and report back the responses. Had it running on a rpi I
left to leech my parents internet but took it down once they started
complaining about slow speeds and eventually got distracted and lost
all the work on it.

Your thing looks much more neat and presentable, congratz!

----------------------------------------------------------------------
raiph · 2016-07-31 00:30

> 200+ simultaneous connections + [bunch of other work] ... on a rpi

Nice. :)

Rakudo runs on rpis. But only with the JIT disabled. Slow isn't the
right word.

> Your thing

Er, I can see how I tricked you in to thinking it was my thing but I'm
not Zoffix. I just ♥ Zoffix -- and no, I'm not MahBot either :).

> looks much more neat and presentable

It's a nice example of Perl 6, dontchya think?

Did you spot that it's also a nice example of Perl 6 using Perl 5
code? As [a comment in the /r/programming discussion of the OP](https:
//www.reddit.com/r/programming/comments/4v9gt0/ircclient_perl_6_multis
erver_irc_or_awesome_async/d5wo3ck) says:

> I think one of my favorite parts of that was `use
Mojo::UserAgent:from<Perl5>;`

> Being able to import and use Perl 5 code is insane.