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 02:48 | Nová verze

Po půl roce od vydání verze 9.0 (zprávička) byla vydána verze 10.0 zvukového serveru PulseAudio. Přehled novinek v poznámkách k vydání.

Ladislav Hagara | Komentářů: 14
dnes 00:33 | Komunita Ladislav Hagara | Komentářů: 1
včera 17:30 | Zajímavý článek

Mozilla.cz informuje, že webový prohlížeč Firefox bude od verze 53 obsahovat integrovaný prohlížeč dat ve formátu JSON. Firefox kromě strukturovaného prohlížení nabídne také možnost filtrace a uložení na disk. Dle plánu by měl Firefox 53 vyjít 18. 4. 2017.

Ladislav Hagara | Komentářů: 1
včera 11:00 | Komunita

Členové a příznivci spolku OpenAlt se pravidelně schází v Praze a Brně. Fotky z pražských srazů za uplynulý rok si můžete prohlédnout na stránkách spolku. Příští sraz se koná už zítra 19. ledna – tentokrát je tématem ergonomie ovládání počítače – tzn. klávesnice, myši a další zařízení. Také budete mít příležitost si prohlédnout pražský hackerspace Brmlab.

xkucf03 | Komentářů: 0
17.1. 21:55 | Komunita

Nadace pro svobodný software (FSF) oznámila aktualizaci seznamu prioritních oblastí (changelog), na které by se měli vývojáři a příznivci svobodného softwaru zaměřit. Jsou to například svobodný operační systém pro chytré telefony, hlasová a video komunikace nebo softwarový inteligentní osobní asistent.

Ladislav Hagara | Komentářů: 19
17.1. 16:44 | Nová verze

Byla vydána verze 2.0.0 knihovny pro vykreslování grafů v programovacím jazyce Python Matplotlib (Wikipedie, GitHub). Přehled novinek a galerie grafů na stránkách projektu.

Ladislav Hagara | Komentářů: 0
17.1. 15:33 | Komunita

V australském Hobartu probíhá tento týden konference linux.conf.au 2017. Na programu je celá řada zajímavých přednášek. Sledovat je lze online.

Ladislav Hagara | Komentářů: 0
17.1. 10:20 | Zajímavý článek

Pavel Tišnovský se v dvoudílném článku na MojeFedora.cz věnuje bitmapovým (rastrovým) grafickým editorům ve Fedoře. V prvním dílu se věnuje editorům MyPaint, MtPaint, Pinta, XPaint, Krita a GIMP. V pokračování pak editorům GNU Paint (gpaint), GrafX2, KolourPaint, KIconEdit a Tux Paint.

Ladislav Hagara | Komentářů: 1
16.1. 17:11 | Komunita

Byl proveden bezpečnostní audit svobodného IMAP a POP3 serveru Dovecot (Wikipedie). Audit byl zaplacen z programu Mozilla Secure Open Source a provedla jej společnost Cure53. Společnost Cure53 byla velice spokojena s kvalitou zdrojových kódu. V závěrečné zprávě (pdf) jsou zmíněny pouze 3 drobné a v upstreamu již opravené bezpečnostní chyby.

Ladislav Hagara | Komentářů: 0
16.1. 15:30 | IT novinky

Nadace Raspberry Pi představila na svém blogu Raspberry Pi Compute Module 3 (CM3 a CM3L), tj. zmenšené Raspberry Pi vhodné nejenom pro průmyslové využití. Jedná se o nástupce Raspberry Pi Compute Module (CM1) představeného v dubnu 2014. Nový CM3 vychází z Raspberry Pi 3 a má tedy dvakrát více paměti a desetkrát větší výkon než CM1. Verze CM3L (Lite) je dodávána bez 4 GB eMMC flash paměti. Uživatel si může připojit svou vlastní. Představena byla

… více »
Ladislav Hagara | Komentářů: 3
Jak se stavíte k trendu ztenčování přenosných zařízení (smartphony, notebooky)?
 (10%)
 (2%)
 (74%)
 (3%)
 (11%)
Celkem 321 hlasů
 Komentářů: 24, poslední 17.1. 10:14
    Rozcestník
    Reklama

    Dotaz: Perl XMPP Jabber

    pepe_ avatar 10.9.2012 20:17 pepe_ | skóre: 46
    Perl XMPP Jabber
    Přečteno: 290×

    Zdravim , jelikoz neovladam perl ale mam v perlu scriptik pro ICQ , ten bych potreboval upravit pro XMPP :

     

    ---

     

    #!/usr/bin/perl
    use strict;
    #use warnings;
    use Net::OSCAR qw(:standard);
    use LWP::Simple;
    use Text::Iconv;
    
    my $screenname = '***icq-uin***';
    my $password   = '***icq-pass***';
    my $encoding = 'ISO-8859-2';
    #my $encoding = 'UTF-8';
    my $oscar;
    my $meme;
    my $iconv_utf8 = Text::Iconv->new("UTF-8", $encoding);
    my $iconv_utf16 = Text::Iconv->new("UTF-16BE", $encoding);
    
    $oscar = Net::OSCAR->new();
    $oscar->set_callback_im_in(\&im_in);
    $oscar->signon($screenname, $password);
    
    while(1) {
        $oscar->do_one_loop();
    }
    sub im_in {
        my($oscar, $sender, $message) = @_;
    
        $message = $iconv_utf16->convert($message) || $iconv_utf8->convert($message) || $message || return;
        print "\n\n\n\n*** \'".$sender."\' napsal: \'".$message."\' \n\n";
        my $bash_command='./icq_run.sh '.$message.' |';
        open(my $output,$bash_command) or die $!;
        while(my $line=<$output>){
        $oscar->send_im($sender, $line);
    }
    }
    

     

     

    ---

     

    Poradí někdo jak to předělat na XMPP / Jabber ?  Nějak mi ty návody nefungujou : ->

     

    viz :   http://codehacienda.wordpress.com/2011/02/25/perl-xmpp-library-for-creating-a-chat-bot-anyeventxmpp-example/

    Odpovědi

    mess avatar 10.9.2012 20:29 mess | skóre: 43 | blog: bordel | Háj ve Slezsku - Smolkov
    Rozbalit Rozbalit vše Re: Perl XMPP Jabber
    Několik jednoduchých kroků:
    1. Zahoď ten skript pro ICQ. Knihovna pro Jabber bude mít úplně jiné rozhraní a bude se úplně jinak používat.
    2. Stáhni si a uprav tohohle Jabber Bota (klikni si nahoře na "View source", ten jejich zvýrazňovač syntaxe tam nasekal nějaké chyby). Podle zběžného pohledu by to mělo umět poslat zpátky každou zprávu, kterou tomu pošleš.
    3. Profit!
    Cez párne mesiace zošíváš vaginy, cez neparne montuješ hajzle.
    pepe_ avatar 11.9.2012 00:05 pepe_ | skóre: 46
    Rozbalit Rozbalit vše Re: Perl XMPP Jabber

    Zatím mám :

     

    #!/usr/bin/python
    import xmpp
    login = 'uziv_jmeno' 
    pwd   = 'uziv_heslo'
    cnx = xmpp.Client('jabber.root.cz')
    cnx.connect( server=('jabber.root.cz',5223) )
    cnx.auth(login,pwd, 'chat')
    cnx.send(xmpp.dispatcher.Presence(status=""))
    
    def messageHandler(conex,msg):
      return cnx.send(xmpp.Message(str(msg.getFrom()) , str(msg.getBody())))
    
    
    cnx.RegisterHandler("message", messageHandler)
    
    while 1:
        try:
            cnx.Process(1)
        except KeyboardInterrupt:
            break
    

     

     

    Jenže stále to něco odesílá a nevim jak to má vypadat. Podadíš aby to vykonalo totéž ?

    mess avatar 11.9.2012 00:44 mess | skóre: 43 | blog: bordel | Háj ve Slezsku - Smolkov
    Rozbalit Rozbalit vše Re: Perl XMPP Jabber
    A proč sis nestáhl toho bota, co jsem na něj odkazoval? Tam ti stačí změnit login, heslo a upravit jednu funkci, která se automaticky spustí po přijetí zprávy. S tímhle pythonním skriptem ti nepomůžu, s xmpp knihovnou v pythonu nemám žádné zkušenosti.
    Cez párne mesiace zošíváš vaginy, cez neparne montuješ hajzle.
    pepe_ avatar 11.9.2012 20:20 pepe_ | skóre: 46
    Rozbalit Rozbalit vše Re: Perl XMPP Jabber

    Protože mně to nefunguje.

     

    root@alix:/# ./jaberboot
    Connected
    Authed
    Disconnected
    Can't call method "GetFrom" on an undefined value at ./jaberboot line 43.

    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.