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 13:44 | Zajímavý článek

    Boudhayan "bbhtt" Bhattcharya v článku Uzavření kapitoly o OpenH264 vysvětluje, proč bylo OpenH264 odstraněno z Freedesktop SDK.

    Ladislav Hagara | Komentářů: 2
    dnes 03:44 | IT novinky

    Představeny byly nové verze AI modelů: DeepSeek V3-0324, Google Gemini 2.5 a OpenAI 4o Image Generation.

    Ladislav Hagara | Komentářů: 0
    dnes 03:11 | Nová verze

    XZ Utils (Wikipedie) byly vydány ve verzi 5.8.0. Jedná se o první větší vydání od backdooru v XZ v loňském roce.

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

    Byla vydána nová verze 0.40.0 multimediálního přehrávače mpv (Wikipedie) vycházejícího z přehrávačů MPlayer a mplayer2. Přehled novinek, změn a oprav na GitHubu. Požadován je FFmpeg 6.1 nebo novější a také libplacebo 6.338.2 nebo novější.

    Ladislav Hagara | Komentářů: 20
    včera 14:11 | Nová verze

    Byla vydána nová verze 2.20 svobodného video editoru Flowblade (GitHub, Wikipedie). Přehled novinek v poznámkách k vydání. Videoukázky funkcí Flowblade na Vimeu. Instalovat lze také z Flathubu.

    Ladislav Hagara | Komentářů: 0
    včera 04:22 | Nová verze

    LibrePCB, tj. svobodný multiplatformní softwarový nástroj pro návrh desek plošných spojů (PCB), byl vydán ve verzi 1.3.0. Přehled novinek v příspěvku na blogu a v aktualizované dokumentaci. Vypíchnut je interaktivní HTML BOM (Bill of Materials) a počáteční podpora Rustu. Zdrojové kódy LibrePCB jsou k dispozici na GitHubu pod licencí GPLv3.

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

    Minulý měsíc Hector "marcan" Martin skončil jako upstream vývojář linuxového jádra i jako vedoucí projektu Asahi Linux. Vývoj Asahi Linuxu, tj. Linuxu pro Apple Silicon, ale pokračuje dál. Byl publikován březnový přehled dění a novinek z vývoje. Vývojáře lze podpořit na Open Collective.

    Ladislav Hagara | Komentářů: 13
    24.3. 16:16 | Zajímavý článek

    Ruská firma Operation Zero nabízí až $4 miliony za funkčí exploit komunikační platformy Telegram. Nabídku učinila na platformě X. Firma je známá prodejem exploitů ruské vládě a soukromým společnostem. Další informace na securityweek.com.

    Max | Komentářů: 0
    24.3. 16:00 | Nová verze

    Po 9 týdnech vývoje od vydání Linuxu 6.13 oznámil Linus Torvalds vydání Linuxu 6.14. Proč až v pondělí? V neděli prostě zapomněl :-). Přehled novinek a vylepšení na LWN.net: první a druhá polovina začleňovacího okna a Linux Kernel Newbies.

    Ladislav Hagara | Komentářů: 0
    24.3. 14:22 | Komunita

    Konference LinuxDays 2025 proběhne o víkendu 4. a 5. října v Praze v areálu ČVUT v Dejvicích na FIT.

    Ladislav Hagara | Komentářů: 0
    Jaké je vaše preferované prostředí?
     (27%)
     (1%)
     (1%)
     (2%)
     (1%)
     (1%)
     (64%)
     (2%)
    Celkem 231 hlasů
     Komentářů: 10, poslední 24.3. 12:37
    Rozcestník

    Dotaz: Perl nacitani ze souboru

    27.6.2007 12:14 Bart | skóre: 1
    Perl nacitani ze souboru
    Přečteno: 434×
    Zdravím měl bych malý dotaz. Potřebuji načítat data ze souboru kde mam uložený název a ip v tomto tvaru AP_name=169.254.1.1, každý záznam bude na novém řádku a tak aby řádky začínající # byly ignorovány. Prostě to potřebuji vytáhnout do proměnných zvlášť ip a zvlášť jméno a s nimi dále pracovat. Potřeboval bych nakopnout jak nejlíp na to.Moc díky za rady

    Odpovědi

    27.6.2007 12:43 happy barney | skóre: 34 | blog: dont_worry_be_happy
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    while (<>) {
      chomp;
      next if /^\s*#/;
      my ($name, $ip) = split /=/;
    ...
    }
    
    27.6.2007 14:08 Bart | skóre: 1
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    Díky to vypadá ok akorát se mi nedaří načíst ty hodnoty do proměnných před cyklem otevřu soubor kde mam ap_name=169.254.1.1 ale hodnoty se neuloží. Sry jsem začátečník
    wolf09 avatar 27.6.2007 14:18 wolf09 | skóre: 30
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    open (FILE,'filename') while ('<'FILE'>') { chomp; ($NAME,$ADDR)=split /=/; }

    akorat z '<'FILE'>' musite odstranit ', protoze jinak se mi to nepodarilo napsat

    vice : perldoc -f open
    Zkusili jste to vypnout a znovu zapnout ?
    27.6.2007 15:52 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    To se dělá takhle:
    open (FILE,'filename')
    while (<FILE>)
    {
     chomp;
     ($NAME,$ADDR)=split /=/;
    }
    aneb debilní SGML a na něm založené antediluviální značkovací jazyky jako HTML, XML, XHTML a podobný odpad.
    XML je zbytečný, pomalý, nešikovný balast, znovu vynalézané kolo a ještě ke všemu šišaté, těžké a kýčovitě pomalované.
    wolf09 avatar 27.6.2007 16:03 wolf09 | skóre: 30
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    Jak jsi to tam dostal ?

    Me to porad hlasilo, ze znacka FILE je nepripustna, ani kdyz jsem zkusil dat znacky PRE
    Zkusili jste to vypnout a znovu zapnout ?
    27.6.2007 16:04 happy barney | skóre: 34 | blog: dont_worry_be_happy
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    &lt;
    27.6.2007 16:34 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    <pre>open (FILE,'filename')
    while (&lt;FILE&gt;)
    {
     chomp;
     ($NAME,$ADDR)=split /=/;
    }</pre>
    XML je zbytečný, pomalý, nešikovný balast, znovu vynalézané kolo a ještě ke všemu šišaté, těžké a kýčovitě pomalované.
    27.6.2007 22:39 Zdeněk Burda | skóre: 61 | blog: Zdendův blog | Praha
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    -- Nezdar není hanbou, hanbou je strach z pokusu.
    27.6.2007 15:50 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    Díky to vypadá ok akorát se mi nedaří načíst ty hodnoty do proměnných před cyklem otevřu soubor kde mam ap_name=169.254.1.1 ale hodnoty se neuloží. Sry jsem začátečník
    Co se neuloží, kdo se neuloží? Co se takhle napřed naučit aspoň základy perlu?
    XML je zbytečný, pomalý, nešikovný balast, znovu vynalézané kolo a ještě ke všemu šišaté, těžké a kýčovitě pomalované.
    27.6.2007 16:12 happy barney | skóre: 34 | blog: dont_worry_be_happy
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    to asi preto, že uvedený príklad číta zo STDIN. Pre čítanie zo súboru tu už úpravy odzneli. Hodnoty sa uložia do premenných, ktoré prestanú na konci cyklu existovať.
    27.6.2007 15:13 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    Dnes nikdo python? :D
    IFS==
    while read name ip; do
      if [[ $name =~ ^[^#].* ]]; then
        echo "$name - $ip"
      fi
    done < data.tmp
    
    Pro starší verze bash nebo třeba sh by bylo potřeba adekvátně upravit tu podmínku.
    27.6.2007 15:15 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    Hele ono je koukám v titulku klíčové slovo perl :) Tak to bude asi tím... :D
    27.6.2007 18:05 Jan Martinek | skóre: 43 | blog: johny | Brno
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    Tak já to sem napíšu jen tak z tradice:
    #!/usr/bin/python
    for line in file('soubor.txt'):
        if line.startswith('#'): continue
        try:
            name, addr = line.split('=')
        except ValueError:
            continue
        name = name.strip()
        addr = addr.strip()
        print name, addr
    
    27.6.2007 21:35 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    :)
    28.6.2007 08:34 Bart | skóre: 1
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    Díky všem za rady už jsem to rozchodil jak potřebuji, ale ještě mě trápí jedna věc pokud ten script pustím z ruky tak jede ok ale pokud cronem tak to vypadá jako by byl problém s proměnnýma, generuju soubor a mam jeho název složeny $nazev.png pokud to pustím z ruky tak se vloží správná hodnota proměnné $název pokud cronem tak to vyhodí jen .png. Pokud je to zbytečný dotaz tak sry jsem začátečník :) Díky za pomoc
    28.6.2007 09:42 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    Ook?
    XML je zbytečný, pomalý, nešikovný balast, znovu vynalézané kolo a ještě ke všemu šišaté, těžké a kýčovitě pomalované.
    28.6.2007 09:49 Bart | skóre: 1
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    :) tím ok myslím že vloží hodnotu kterou by měl vložit pokud to pustím z cronu tak nevloží nic
    28.6.2007 10:15 Hynek (Pichi) Vychodil | skóre: 43 | blog: Pichi | Brno
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    Co se kam vloží nebo nevloží. Proboha, položte srozumitelnou otázku! Kde se ta proměnná bere? Kam se vkládá? Nejlépe s ukázkou kódu a chybovými výstupy. Pokládejte dotazy podle tohoto návodu!
    XML je zbytečný, pomalý, nešikovný balast, znovu vynalézané kolo a ještě ke všemu šišaté, těžké a kýčovitě pomalované.
    28.6.2007 09:51 Zdeněk Burda | skóre: 61 | blog: Zdendův blog | Praha
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    Počítej s tím, že se ti liší prostředí při spouštění z cronu a při ručním spouštění z konzole. Všechny proměnné je třeba si správně ve skriptu nadefinovat (nebo při jeho spouštění).
    -- Nezdar není hanbou, hanbou je strach z pokusu.
    28.6.2007 09:53 Bart | skóre: 1
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    takže je potřeba na začátek souboru deklarovat všechny proměnné jakých typů budou a mělo by to být ok?
    28.6.2007 10:53 happy barney | skóre: 34 | blog: dont_worry_be_happy
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    v prvom rade sem šupni kód, ako inicializuješ premennú $nazov, ako spúsťaš skript ručne, a ako z cron-u.
    28.6.2007 11:57 Bart | skóre: 1
    Rozbalit Rozbalit vše Re: Perl nacitani ze souboru
    už to mám byla tam jedna chyba bylo třeba pevně určit cestu všem moc díky za rady

    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.