PoE :: Component :: IRC POE :: COMPONENT :: IRC is een volledig evenement-aangedreven IRC-clientmodule.
Download nu

PoE :: Component :: IRC Rangschikking & Samenvatting

PoE :: Component :: IRC Tags

IRC-klant Perl-module perl module gebeurtenis-gedreven IRC

PoE :: Component :: IRC Beschrijving

POE :: Component :: IRC is een volledig event driven IRC client module. POE :: Component :: IRC is een volledig event-driven IRC client module.SYNOPSIS # Een eenvoudige Rot13 'encryptie' bot use strict; gebruik waarschuwingen; gebruik POE qw (Component :: IRC); mijn $ bijnaam = 'Flibble'. $$; mijn $ IRCNAME = 'Flibble de Sailor Bot'; mijn $ IRCSERVER = 'irc.blahblahblah.irc'; mijn $ port = 6667; mijn @channels = ( '#Blah', '#Foo', '#Bar'); # We creëren een nieuwe PoCo-IRC object en component. mijn $ irc = POE :: Component :: IRC-> spawn (nick => $ bijnaam, server => $ IRCSERVER, port => $ port, IRCNAME => $ IRCNAME,) of sterven "Oh noooo $!"; POE :: Session> create (package_states => ], hoop => {irc => $ irc}); $ Poe_kernel-> run (); exit 0; sub _start {mijn ($ kernel, $ heap) = @_ ; # We krijgen de sessie-ID van de component van het object # en te registreren en aan te sluiten op de opgegeven server. mijn $ irc_session = $ heap -> {irc} -> session_id (); $ Kernel-> post ($ irc_session => registreren => 'all'); $ Kernel-> post ($ irc_session => connect => {}); undef; } Sub irc_001 {mijn ($ kernel, $ afzender) = @_ ; # Haal object van het onderdeel op elk moment door de toegang tot de hoop van # de afzender mijn $ poco_object = $ verzender-> get_heap (); afdrukken "Aangesloten op", $ poco_object-> servernaam (), "n"; # In ieder irc_ * gebeurtenissen SENDER zullen de PoCo-IRC sessie $ kernel-> post ($ afzender => doe mee => $ _) voor @channels; undef; } Sub irc_public {mijn ($ kernel, $ afzender $ who, $ waar $ wat) = @_ ; mijn $ nick = (split / /, die $!) ; mijn $ channel = $ waar -> ; if (mijn ($ rot13) = $ welke = ~ / ^ rot13 (+) /.) {$ rot13 = ~ tr ; $ Kernel-> post ($ afzender => PRIVMSG => $ channel => "$ nick: $ rot13"); } Undef; } # We geregistreerd voor alle evenementen, deze zullen sommige debug info produceren. sub _default {mijn ($ gebeurtenis, $ args) = @_ ; mijn @output = ( "$ event:"); foreach my $ arg (@ $ args) {if (ref ($ arg) eq 'ARRAY') {push (@output, ""); } Else {push (@output, " '$ arg'"); }} Drukken STDOUT nemen aan '', @output, "n"; terugkeer 0; } POE :: Component :: IRC is een POE component (die zou hebben geraden?) Die fungeert als een eenvoudig bestuurbaar IRC client voor uw andere POE componenten en sessies. U maakt een IRC-component en vertellen welke gebeurtenissen uw sessie zorgen over gaat en waar te verbinden, en stuurt het terug interessante IRC gebeurtenissen wanneer ze gebeuren. Je maakt de klant dingen doen door toezending van evenementen. Dat is alles wat er is. Cool, niet? De POE :: Component :: IRC verdeling heeft een docs / map met een verzameling van opvallende documentatie, met inbegrip de relevante RFCs.POE :: Component :: IRC bestaat uit een POE :: Session dat de IRC-verbinding en verzendingen 'irc_' voorafgegaan gebeurtenissen aan geïnteresseerde sessies en een object dat kan worden gebruikt om toegang tot aanvullende informatie met behulp van methods.Sessions registreren beheert hun interesse in het ontvangen van 'irc_' events door het sturen van 'register' om de component. Men zou doen dit meestal in uw _start handler. Uw sessie zal de gebeurtenissen ontvangen totdat u 'uitschrijven'. Het onderdeel zal blijven om rond te blijven totdat je het niet vertellen om met 'shutdown'.The SYNOPSIS toont een vrij eenvoudige bot.Requirements: · Perl Vereisten: · Perl

PoE :: Component :: IRC Gerelateerde software