Mojo::IRC::Events - Example IRC events
$self->$callback({ command => 401, params => [ 'nick', 'othernick', 'No such nick/channel' ], prefix => '1.2.3.4', raw_line => ':1.2.3.4 401 nick othernick :No such nick/channel', });
$self->$callback({ params => ['#html'], raw_line => ':somenick!~someuser@1.2.3.4 JOIN #html', command => 'JOIN', prefix => 'somenick!~someuser@1.2.3.4' });
$self->$callback({ params => ['newnick'], raw_line => ':oldnick!~someuser@hostname.com NICK :newnick', command => 'NICK', prefix => 'somenick!~someuser@hostname.com' });
$self->$callback({ params => ['somenick', '+i'], raw_line => ':somenick!~someuser@hostname.com MODE somenick :+i', command => 'MODE', prefix => 'somenick!~someuser@hostname.com' });
$self->$callback({ params => ['somenick', 'on 1 ca 1(4) ft 10(10)'], raw_line => ':Zurich.CH.EU.Undernet.Org NOTICE somenick :on 1 ca 1(4) ft 10(10)', command => 'NOTICE', prefix => 'Zurich.CH.EU.Undernet.Org', });
$self->$callback({ command => 'PART', params => ['#channel'], raw_line => ':somenick!~someuser@host PART #channel', prefix => 'somenick!~someuser@host', })
$self->$callback({ params => [2687237629], raw_line => 'PING :2687237629', command => 'PING', })
$self->$callback({ params => [ '#channel', 'some message' ], raw_line => ':nick!user@host PRIVMSG #nms :some message', command => 'PRIVMSG', prefix => 'nick!user@host', });
$self->$callback({ params => ['somenick', 'This server was created Thu Jun 21 2012 at 01:26:15 UTC'], raw_line => ':irc.example.com 003 somenick :This server was created Thu Jun 21 2012 at 01:26:15 UTC', command => '003', prefix => 'irc.example.com' });
$self->$callback({ params => ['somenick', '#channel', 'End of /NAMES list.'], raw_line => ':Budapest.Hu.Eu.Undernet.org 366 somenick #channel :End of /NAMES list.', command => '366', prefix => 'Budapest.Hu.Eu.Undernet.org' });
$self->$callback({ params => ['somenick', 'WHOX', 'WALLCHOPS', 'WALLVOICES', 'USERIP', 'CPRIVMSG', 'CNOTICE', 'SILENCE=25', 'MODES=6', 'MAXCHANNELS=20', 'MAXBANS=50', 'NICKLEN=12', 'are supported by this server'], raw_line => ':irc.example.com 005 somenick WHOX WALLCHOPS WALLVOICES USERIP CPRIVMSG CNOTICE SILENCE=25 MODES=6 MAXCHANNELS=20 MAXBANS=50 NICKLEN=12 :are supported by this server', command => '005', prefix => 'irc.example.com' })
$self->$callback({ params => ['somenick', '13700', 'channels formed'], raw_line => ':irc.example.com 254 somenick 13700 :channels formed', command => '254', prefix => 'irc.example.com' })
$self->$callback({ params => ['somenick', 'There are 3400 users and 46913 invisible on 18 servers'], raw_line => ':irc.example.com 251 somenick :There are 3400 users and 46913 invisible on 18 servers', command => '251', prefix => 'irc.example.com' });
$self->$callback({ params => ['somenick', 'I have 12000 clients and 1 servers'], raw_line => ':irc.example.com 255 somenick :I have 12000 clients and 1 servers', command => '255', prefix => 'irc.example.com' });
$self->$callback({ params => ['somenick', '19', 'operator(s) online'], raw_line => ':irc.example.com 252 somenick 19 :operator(s) online', command => '252', prefix => 'irc.example.com' });
$self->$callback({ params => ['somenick', '305', 'unknown connection(s)'], raw_line => ':irc.example.com 253 somenick 305 :unknown connection(s)', command => '253', prefix => 'irc.example.com' })
$self->$callback({ params => ['somenick', 'irc.example.com', 'u2.10.12.14', 'dioswkgx', 'biklmnopstvrDR', 'bklov'], raw_line => ':irc.example.com 004 somenick irc.example.com u2.10.12.14 dioswkgx biklmnopstvrDR bklov', command => '004', prefix => 'irc.example.com', })
$self->$callback({ params => ['somenick', '=', '#html', 'somenick Indig0 Wildblue @HTML @CSS @Luch1an @Steaua_ Indig0_ Pilum @fade'], raw_line => ':Budapest.Hu.Eu.Undernet.org 353 somenick = #html :somenick Indig0 Wildblue @HTML @CSS @Luch1an @Steaua_ Indig0_ Pilum @fade', command => '353', prefix => 'Budapest.Hu.Eu.Undernet.org' })
$self->$callback({ command => '001', params => ['somenick', 'Welcome to the UnderNet IRC Network, somenick'], prefix => 'Zurich.CH.EU.Undernet.Org' raw_line => ':Zurich.CH.EU.Undernet.Org 001 somenick :Welcome to the UnderNet IRC Network, somenick', })
$self->$callback({ command => '002', params => ['somenick', 'Your host is irc.example.com, running version u2.10.12.14'], prefix => 'irc.example.com' raw_line => ':irc.example.com 002 somenick :Your host is irc.example.com, running version u2.10.12.14', });
$self->$callback({ command => '479', params => [ 'nickname', '1', 'Illegal channel name' ], prefix => 'example.com', raw_line => ':example.com 479 nickname 1 :Illegal channel name', });
This program is free software, you can redistribute it and/or modify it under the terms of the Artistic License version 2.0.
Marcus Ramberg - mramberg@cpan.org
mramberg@cpan.org
Jan Henning Thorsen - jhthorsen@cpan.org
jhthorsen@cpan.org
To install Mojo::IRC, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Mojo::IRC
CPAN shell
perl -MCPAN -e shell install Mojo::IRC
For more information on module installation, please visit the detailed CPAN module installation guide.