abclinuxu.cz AbcLinuxu.cz itbiz.cz ITBiz.cz HDmag.cz HDmag.cz abcprace.cz AbcPráce.cz
AbcLinuxu hledá autory!
Inzerujte na AbcPráce.cz od 950 Kč
Rozšířené hledání
×
    dnes 01:22 | Nová verze Ladislav Hagara | Komentářů: 0
    dnes 00:55 | Zajímavý projekt

    PyXL je koncept procesora, ktorý dokáže priamo spúštat Python kód bez nutnosti prekladu ci Micropythonu. Podľa testov autora je pri 100 MHz približne 30x rýchlejší pri riadeni GPIO nez Micropython na Pyboard taktovanej na 168 MHz.

    vlk | Komentářů: 0
    včera 19:44 | Nová verze

    Grafana (Wikipedie), tj. open source nástroj pro vizualizaci různých metrik a s ní související dotazování, upozorňování a lepší porozumění, byla vydána ve verzi 12.0. Přehled novinek v aktualizované dokumentaci.

    Ladislav Hagara | Komentářů: 0
    včera 17:33 | Nová verze

    Raspberry Pi OS, oficiální operační systém pro Raspberry Pi, byl vydán v nové verzi 2025-05-06. Přehled novinek v příspěvku na blogu Raspberry Pi a poznámkách k vydání. Pravděpodobně se jedná o poslední verzi postavenou na Debianu 12 Bookworm. Následující verze by již měla být postavena na Debianu 13 Trixie.

    Ladislav Hagara | Komentářů: 0
    včera 05:33 | Komunita

    Richard Stallman dnes v Liberci přednáší o svobodném softwaru a svobodě v digitální společnosti. Od 16:30 v aule budovy G na Technické univerzitě v Liberci. V anglickém jazyce s automaticky generovanými českými titulky. Vstup je zdarma i pro širokou veřejnost.

    Ladislav Hagara | Komentářů: 13
    včera 03:55 | Komunita

    sudo-rs, tj. sudo a su přepsáné do programovacího jazyka Rust, nahradí v Ubuntu 25.10 klasické sudo. V plánu je také přechod od klasických coreutils k uutils coreutils napsaných v Rustu.

    Ladislav Hagara | Komentářů: 0
    6.5. 22:11 | Nasazení Linuxu

    Fedora se stala oficiální distribucí WSL (Windows Subsystem for Linux).

    Ladislav Hagara | Komentářů: 2
    6.5. 13:22 | IT novinky

    Společnost IBM představila server IBM LinuxONE Emperor 5 poháněný procesorem IBM Telum II.

    Ladislav Hagara | Komentářů: 1
    6.5. 04:55 | Nová verze

    Byla vydána verze 4.0 multiplatformního integrovaného vývojového prostředí (IDE) pro rychlý vývoj aplikaci (RAD) ve Free Pascalu Lazarus (Wikipedie). Přehled novinek v poznámkách k vydání. Využíván je Free Pascal Compiler (FPC) 3.2.2.

    Ladislav Hagara | Komentářů: 1
    6.5. 00:33 | Komunita

    Podpora Windows 10 končí 14. října 2025. Připravovaná kampaň Konec desítek (End of 10) může uživatelům pomoci s přechodem na Linux.

    Ladislav Hagara | Komentářů: 32
    Jaký filesystém primárně používáte?
     (57%)
     (1%)
     (8%)
     (22%)
     (4%)
     (2%)
     (3%)
     (1%)
     (1%)
     (3%)
    Celkem 549 hlasů
     Komentářů: 25, poslední včera 20:12
    Rozcestník

    Dotaz: IRC Perl Bot

    9.6.2009 18:19 Mr.S1lent.cz
    IRC Perl Bot
    Přečteno: 413×

    Zdravim,

     

    zacal jsem psat IRC bota v Perlu, v ramci cviceni, ponevadz jsem se tento jazyk zacal nedavno ucit. Zatim se umi jen prihlasit na zadany kanal v connection objectu. Pridal jsem tam i funkci na test obsahu "skla" IRC chatu, ktery projizdim regularem (resp command handler), avsak mi z neznamych duvodu nefunguje... Uz to resim tyden, vim, ze pred tydnem to tak pet minut slo, pote jsem tam neco prepsal a od te doby to nemuzu a nemuzu rozjet. Byl bych vam vdecny za jakekoliv rady, zdrojak mam na pastebin, tady je link:

     

    http://pastebin.com/m4ccd3d6

     

    moc dekuju, uz si opravdu nevim rady :-(

    Odpovědi

    10.6.2009 04:54 zha
    Rozbalit Rozbalit vše Re: IRC Perl Bot
    Jestli nejsou problemy s pripojenim, tak mas chyby v kodu:
    sub command {
    ...
      if ($text =~ /^\!(.+)$/) {
        command_output($conn, $text); # $1 ?
    
    sub command_output {
    ...
      if (/^test$/) { # nebo vykricnik ?
    A taky bude potreba neco jako
    $conn->add_handler('neco', \&command);
    10.6.2009 09:03 Mr.S1lent.cz
    Rozbalit Rozbalit vše Re: IRC Perl Bot

    Dekuji moc, ale stale to bohuzel nefunguje, v prvnim pripade jsem $text nahradil $1, v druhem pripade jsem pridal else s negujicim vystupem (Text neprobehl uspesne), tudiz to by to melo resit pripadnou chybu (ale i tak jsem se inspiroval tutorialem, kde to meli resene takhle) a pres handler to taky checkuju, ale stale nic... problem s pripojenim, to bych nerekl, mam stabilni ping a bot se pripoji bez problemu :-)

    Neni potreba jeste nejaky jiny modul, nez Net::IRC nebo kde by mohla byt chyba? Ja uz opravdu z toho sedivim :-(

     


     

    10.6.2009 18:58 Mr.S1lent.cz
    Rozbalit Rozbalit vše Re: IRC Perl Bot

    Resp. tady je upraveny kod v soucasne podobe: http://pastebin.com/m5b883f58

     

    Pridal jsem tam vypis pomoci $conn->privmsg(); pri join, coz se provede kladne, pote jsem zjednodusil tu cast commands, ale i presto to nikdy nic nevypise, stale nikdo nevi, kde by mohla byt chyba?....

    12.6.2009 00:25 zha
    Rozbalit Rozbalit vše Re: IRC Perl Bot
    Kde jsi prisel na 'syntax_error' ? Ja to v eventech nevidim (http://search.cpan.org/perldoc?Net::IRC::Event). Dej tam 'public'.
    12.6.2009 14:10 Mr.S1lent.cz
    Rozbalit Rozbalit vše Re: IRC Perl Bot

    Dekuji mnohokrat, sice jsem to vyresil, jeste nez mi bylo odpovezeno, ale i tak vas to stalo urcite nejaky ten cas...

     

    Nyni funguje vsechno jak ma, ale neprisel jsem bohuzel na zpusob, jak zjistit prava jednotlivych nicku.

    Mam takovou myslenku, ze bot bude zvladat radu veci na zakladne danych prikazu i kicky a bany nehlede na

    nastaveni danych veci do db apod... Pouzivam tam modul Net::IRC, ktery se chova tak, ze pomoci $conn->prikaz( parametry )

    muzu pouzivat defacto jakekoliv irc prikazy. Prikaz "whois" vypisuje mimojine i to, ve kterych mistnostech se dany uzivatel nachazi

    a i to, jaka ma prava, coz vypisuje na zaklade prefixu u danych mistnosti - napr: +#room @#room nebo %$room, coz by se dalo

    protahnout grepem a vybrat, co potrebuji, to neni slozite, problem je v tom, ze jsem udelal nasledovnou vec:

     

    my $hodnota = $conn->whois( #kanal, $nick ); a pak jsem ji projel dumperem takto: dumper \$hodnota;

    ale bohuzel mi to vypisuje pouze $VAR1 = '24'; mebo jine cislo (u kazdeho nicku je to jine), proto bych se chtel zeptat,

    jestli ty data jdou z te promenne $hodnota nejak vydolovat, nebo jestli mam pouzit jinou metodu, v tom pripade prosim poradte jakou,

     

    moc diky

     

    Mr.S1lent.cz

    13.6.2009 04:54 zha
    Rozbalit Rozbalit vše Re: IRC Perl Bot
    whois (stejne jako dalsi funkce) jen odesle ten prikaz serveru, odpoved nezpracovava. To co ti to vratilo je delka odeslanych dat. Odpoved serveru si musis ohandlovat sam (add_handler) - seznam odpovedi je treba tady: http://www.faqs.org/rfcs/rfc1459.html

    Založit nové vláknoNahoru

    Tiskni Sdílej: Linkuj Jaggni to Vybrali.sme.sk Google Del.icio.us Facebook

    ISSN 1214-1267   www.czech-server.cz
    © 1999-2015 Nitemedia s. r. o. Všechna práva vyhrazena.