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 16:55 | Nová verze

    Byla vydána verze 1.93.0 programovacího jazyka Rust (Wikipedie). Podrobnosti v poznámkách k vydání. Vyzkoušet Rust lze například na stránce Rust by Example.

    Ladislav Hagara | Komentářů: 0
    dnes 14:00 | Komunita

    Svobodný operační systém ReactOS (Wikipedie), jehož cílem je kompletní binární kompatibilita s aplikacemi a ovladači pro Windows, slaví 30. narozeniny.

    Ladislav Hagara | Komentářů: 3
    dnes 11:00 | IT novinky

    Společnost Raspberry Pi má nově v nabídce flash disky Raspberry Pi Flash Drive: 128 GB za 30 dolarů a 256 GB za 55 dolarů.

    Ladislav Hagara | Komentářů: 2
    dnes 10:22 | Zajímavý software

    Technologie Skip pro multiplatformní mobilní vývoj, která umožňuje vývojářům vytvářet iOS a Android aplikace z jediné Swift a SwiftUI kódové základny, se s vydáním verze 1.7 stala open source.

    Ladislav Hagara | Komentářů: 3
    dnes 03:33 | Zajímavý software Ladislav Hagara | Komentářů: 1
    dnes 00:11 | Nová verze

    Byla vydána nová major verze 34.0.0 webového prohlížeče Pale Moon (Wikipedie) vycházejícího z Firefoxu. Přehled novinek v poznámkách k vydání.

    Ladislav Hagara | Komentářů: 1
    včera 16:11 | Humor

    Win8DE je desktopové prostředí pro Wayland, inspirované nechvalně proslulým uživatelským rozhraním Metro z Windows 8. Nabízí dlaždicové rozhraní s velkými tlačítky a jednoduchou navigací, optimalizované pro dotyková zařízení. Cílem projektu je přetvořit design operačního systému Windows 8 do funkčního a minimalistického rozhraní vhodného pro každodenní použití na Linuxu.

    NUKE GAZA! 🎆 | Komentářů: 11
    včera 14:33 | Nová verze

    Laboratoře CZ.NIC vydaly Datovku 4.28.0 a Mobilní Datovku 2.6.0. Hlavní novinkou je ukládání rozpracovaných datových zpráv do konceptů. Datovka je svobodné multiplatformní aplikace pro přístup k datovým schránkám a k trvalému uchovávání datových zpráv v lokální databázi.

    Ladislav Hagara | Komentářů: 6
    včera 14:22 | Zajímavý projekt

    Unix Pipe Game je vzdělávací karetní hra zaměřená na děti a rodiče, která děti učí používat unixové příkazy prostřednictvím interaktivních úkolů. Klíčovým prvkem hry je využití symbolu | pro pipeline neboli 'rouru', který umožňuje propojit výstupy a vstupy jednotlivých unixových příkazů, v tomto případě vytištěných na kartičkách. Předpokládá se, že rodič má alespoň nějaké povědomí o unixových příkazech a jejich provazování pomocí |.

    … více »
    NUKE GAZA! 🎆 | Komentářů: 3
    včera 13:55 | Zajímavý software

    PCIem je linuxový framework, který vytváří virtuální zařízení PCIe pomocí technik, které umožňují hostitelskému operačnímu systému rozpoznat tyto syntetické 'neexistující' karty jako fyzické zařízení přítomné na sběrnici. Framework PCIem je primárně zamýšlen jako pomůcka pro vývoj a testování ovladačů bez nutnosti použít skutečný hardware. Dle tvrzení projektu si fungování PCIem můžeme představit jako MITM (Man-in-the-Middle), který se nachází mezi ovladači a kernelem.

    NUKE GAZA! 🎆 | Komentářů: 1
    Které desktopové prostředí na Linuxu používáte?
     (17%)
     (5%)
     (0%)
     (10%)
     (21%)
     (3%)
     (5%)
     (2%)
     (11%)
     (36%)
    Celkem 569 hlasů
     Komentářů: 17, poslední dnes 15:24
    Rozcestník

    Dotaz: Hromadny skript v Perli

    31.3.2013 15:38 Fabricio
    Hromadny skript v Perli
    Přečteno: 298×
    Caute potreboval by som pomoct s jednym skriptom v perli. Konkretne:

    use Net::Telnet; $telnet = new Net::Telnet ( Timeout=>10, Errmode=>'die'); $telnet->open('192.168.1.1'); $telnet->waitfor('/password: $/i'); $telnet->print('heslo'); $telnet->print('tento prikaz vykonaj');

    Mam v sieti viac aktivnych prvkov ktore riadim cez telnet. Potreboval by som ho ale niekedy pustit plosne napr na 100 IP adries z textoveho suboru. Otazka teda znie ako tento skript upravim tak aby nebral iba IP 192.168.1.1 ale aby bral IP s txt suboru a na vsetkych vykonal prikaz "tento prikaz vykonaj". Za odpovede vopred dakujem.

    Řešení dotazu:


    Odpovědi

    31.3.2013 15:47 stanik89 | skóre: 4 | Ostrava
    Rozbalit Rozbalit vše Re: Hromadny skript v Perli
    soubor bych v perlu načetl do pole a poté bych v cyklu který by pole procházel pouštěl dané příkazy :-)
    31.3.2013 15:57 Fabricio
    Rozbalit Rozbalit vše Re: Hromadny skript v Perli
    Tak nejak si to aj ja predstavujem ale nemam vela skusenosti s programovanim. Pracujem vo firme ako sietar a toto by mi ulahcilo kazdodennu pracu. Mohol by si mi prosim napisat cely skript ako by mal vyzerat?
    Řešení 1× (stanik89)
    31.3.2013 16:28 stanik89 | skóre: 4 | Ostrava
    Rozbalit Rozbalit vše Re: Hromadny skript v Perli
    Mohlo by fungovat tohle, ale netestoval jsem to

    #! /usr/bin/perl

    use Net::Telnet;

    open FILE, "/cesta k souboru/seznam.txt" or die;

    $telnet = new Net::Telnet ( Timeout=>10, Errmode=>'die');

    while (my $line = <FILE>) { chomp;

    $telnet->open($line); $telnet->waitfor('/password: $/i'); $telnet->print('heslo'); $telnet->print('tento prikaz vykonaj');

    }

    close FILE;
    31.3.2013 16:46 Fabricio
    Rozbalit Rozbalit vše Re: Hromadny skript v Perli
    Super funguje to presne tak ako som chcel. Dakujem ti este raz velmi si mi pomohol.
    31.3.2013 16:50 stanik89 | skóre: 4 | Ostrava
    Rozbalit Rozbalit vše Re: Hromadny skript v Perli
    to sem rád, nemáš vůbec zač.
    1.4.2013 20:46 kolcon | skóre: 15 | blog: kolcon
    Rozbalit Rozbalit vše Re: Hromadny skript v Perli
    2-way open je deprecated

    opem my $file, '<', 'cesta_k_souboru' or die "Cannot open file";

    ...

    while (my $line = <$file>) { ...

    } close $file;
    1.4.2013 20:47 kolcon | skóre: 15 | blog: kolcon
    Rozbalit Rozbalit vše Re: Hromadny skript v Perli
    (open ne opem, preklep)
    1.4.2013 01:45 mike
    Rozbalit Rozbalit vše Re: Hromadny skript v Perli
    proc to delat v perlu, vzdyt je to jak delane pro shell a ssh/rsh pripadne expect
    for address in `cat addresses`
    do
        ssh $address $command
    done
    
    1.4.2013 21:07 Ivan
    Rozbalit Rozbalit vše Re: Hromadny skript v Perli
    proc to delat v perlu
    Protoze prave na to je modul Net::Telnet (popr. Net::Telnet::Cisco) delany. Kdysi jsem takovych scriptu nekolik napsal. V Perlu se snadno pouzivaji i fork a signaly. Dany problem se da snadno paralelizovat.

    Konkretni implementaci uz ale postnout nemuzu.

    1.4.2013 21:12 potato
    Rozbalit Rozbalit vše Re: Hromadny skript v Perli
    Otázka asi byla, proč by to měl dělat v Perlu někdo, kdo v něm má potíže načíst řádky ze souboru a projet je cyklem. Forkování a signály asi nebudou v tom případě relevantní.

    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.