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 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ářů: 0
    dnes 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ářů: 6
    včera 23:22 | Pozvánky

    Již tuto středu proběhne 50. Virtuální Bastlírna, tedy dle římského číslování L. Bude L značit velikost, tedy více diskutujících než obvykle, či délku, neboť díky svátku lze diskutovat dlouho do noci? Bude i příští Virtuální Bastlírna virtuální nebo reálná? Nejen to se dozvíte, když dorazíte na diskuzní večer o elektronice, softwaru, ale technice obecně, který si můžete představit jako virtuální posezení u piva spojené s učenou

    … více »
    bkralik | Komentářů: 0
    včera 22:33 | IT novinky

    Dle plánu dnes končí služba Skype. Uživatelé mohou pokračovat v Microsoft Teams.

    Ladislav Hagara | Komentářů: 0
    včera 21:44 | IT novinky

    Český statistický úřad rozšiřuje Statistický geoportál o Datový portál GIS s otevřenými geografickými daty. Ten umožňuje stahování datových sad podle potřeb uživatelů i jejich prohlížení v mapě a přináší nové možnosti v oblasti analýzy a využití statistických dat.

    Ladislav Hagara | Komentářů: 1
    včera 12:33 | Zajímavý projekt

    Kevin Lin zkouší využívat chytré brýle Mentra při hraní na piano. Vytváří aplikaci AugmentedChords, pomocí které si do brýlí posílá notový zápis (YouTube). Uvnitř brýlí běží AugmentOS (GitHub), tj. open source operační systém pro chytré brýle.

    Ladislav Hagara | Komentářů: 1
    včera 12:11 | Pozvánky

    Jarní konference EurOpen.cz 2025 proběhne 26. až 28. května v Brandýse nad Labem. Věnována je programovacím jazykům, vývoji softwaru a programovacím technikám.

    Ladislav Hagara | Komentářů: 0
    4.5. 21:44 | Komunita

    Na čem aktuálně pracují vývojáři GNOME a KDE Plasma? Pravidelný přehled novinek v Týden v GNOME a Týden v KDE Plasma.

    Ladislav Hagara | Komentářů: 0
    4.5. 14:22 | IT novinky

    Před 25 lety zaplavil celý svět virus ILOVEYOU. Virus se šířil e-mailem, jenž nesl přílohu s názvem I Love You. Příjemci, zvědavému, kdo se do něj zamiloval, pak program spuštěný otevřením přílohy načetl z adresáře e-mailové adresy a na ně pak „milostný vzkaz“ poslal dál. Škody vznikaly jak zahlcením e-mailových serverů, tak i druhou činností viru, kterou bylo přemazání souborů uložených v napadeném počítači.

    Ladislav Hagara | Komentářů: 31
    3.5. 22:33 | Nová verze

    Byla vydána nová major verze 5.0.0 svobodného multiplatformního nástroje BleachBit (GitHub, Wikipedie) určeného především k efektivnímu čištění disku od nepotřebných souborů.

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

    Dotaz: odstraneni "temer" dupllicitniho radku

    25.1.2008 10:01 Cejvik | skóre: 5
    odstraneni "temer" dupllicitniho radku
    Přečteno: 367×
    Zdravim, potreboval bych z textoveho souboru odstanit nejkratsi duplicitni radek a na konci doplnit lomitko, napr.

    grafika\2003\Fotoarchiv grafika\2003\Fotoarchiv\akce grafika\2003\Fotoarchiv\akce\03-11-13_praha

    aby zbylo jen grafika\2003\Fotoarchiv\akce\03-11-13_praha\

    Odpovědi

    25.1.2008 10:03 Cejvik | skóre: 5
    Rozbalit Rozbalit vše Re: odstraneni "temer" dupllicitniho radku
    ajaj, tak znovu text
    grafika\2003\Fotoarchiv
    grafika\2003\Fotoarchiv\akce
    grafika\2003\Fotoarchiv\akce\03-11-13_praha
    
    25.1.2008 12:01 ams
    Rozbalit Rozbalit vše Re: odstraneni "temer" dupllicitniho radku
    Kolik takovych radku muze byt v souboru? Jsou nejak usporadany? Tato informace muze znacne zjednodusit reseni. Zatim navrhuji takovy kod v Perlu:
    #!/usr/bin/perl
    while(<>){
            chomp; @F=split/\\/; s/'/\\'/g for @F; $f=pop@F; 
            $e=@F?'$h{\''.join('\'}{\'',@F).'\'}':'$h'; 
            $e.="={\'$f\'=>1}";
            eval$e;
    }
            
    sub p{
            while(($k,$v)=each %{$_[0]}){
                    print "$k\\";
                    if(ref$v) { p($v) } else { print "\n" };
            }
    }
    
    p(\%h)
    
    30.1.2008 09:51 Cejvik | skóre: 5
    Rozbalit Rozbalit vše Re: odstraneni "temer" dupllicitniho radku
    Zkusil jsem testovaci soubour, který obsahoval
    2007\Akce
    2007\Akce\2007
    2007\Akce\2007\pozvanky
    2007\Akce\2007\pozvanky\English
    2007\Akce\2007\DIPLOMY
    2007\Akce\2007\DIPLOMY\bodyfitness
    2007\Akce\2007\DIPLOMY\fitness
    2007\Akce\2007\bannery
    2007\Akce\2007\bannery\molo
    2007\Akce\2007\bannery\vchod
    
    ale dostal jsem misto ocekavaneho
    2007\Akce\2007\pozvanky\English
    2007\Akce\2007\DIPLOMY\bodyfitness
    2007\Akce\2007\DIPLOMY\fitness
    2007\Akce\2007\bannery\molo
    2007\Akce\2007\bannery\vchod
    
    pouze toto:
    2007\Akce\2007\bannery\vchod\
    
    geon avatar 30.1.2008 10:20 geon | skóre: 18 | blog: bavaria
    Rozbalit Rozbalit vše Re: odstraneni "temer" dupllicitniho radku
    Nerad píši hotové scripty, ale občas to také potřebuji, tak tady je řešení v Pythonu. Lomítka na konci a případné načítání ze souboru si snad doděláš sám ;-)
    # -*- coding: utf-8 -*- 
    
    radky = r"""2007\Akce
    2007\Akce\2007
    2007\Akce\2007\pozvanky
    2007\Akce\2007\pozvanky\English
    2007\Akce\2007\DIPLOMY
    2007\Akce\2007\DIPLOMY\bodyfitness
    2007\Akce\2007\DIPLOMY\fitness
    2007\Akce\2007\bannery
    2007\Akce\2007\bannery\molo
    2007\Akce\2007\bannery\vchod"""
    
    seznam=[]
    
    for radek in radky.split("\n"):
        for i in range(len(seznam)):
            if seznam[i] in radek:
                seznam[i] = radek
                break
        else:
            seznam.append(radek)
    
    for radek in seznam:
        print radek
    Práce se soubory: http://www.py.cz/PraceSeSoubory
    30.1.2008 11:49 happy barney | skóre: 34 | blog: dont_worry_be_happy
    Rozbalit Rozbalit vše Re: odstraneni "temer" dupllicitniho radku
    my $last = '';
    for (sort { $b cmp $a } map { chomp; $_ } <>) {
        print $last = $_, "\n"
          if index $last, $_;
    }
    
    30.1.2008 10:24 Vojtěch Horký | skóre: 39 | blog: Vojtův zápisník | Praha
    Rozbalit Rozbalit vše Re: odstraneni "temer" dupllicitniho radku
    sort vstup.txt | gawk -f dupl.awk

    kde dupl.awk vypadá takhle:

    BEGIN {
       predchozi="";
    }
    {
       if (substr($0,1,length(predchozi))!=predchozi) {
            print predchozi;
       }
       predchozi=$0;
    }
    END {
      print predchozi;
    }
    I am always ready to learn although I do not always like to be taught. (W. Churchill)
    30.1.2008 12:55 Semo | skóre: 45 | blog: Semo
    Rozbalit Rozbalit vše Re: odstraneni "temer" dupllicitniho radku
    Ha, najnamakanejsi sedovy skript, aky som kedy spravil:
    sed -n 'H
        g
        s/^\(.*\)\n\1.*//
        s/\n.*//p
        g
        $s/^\(.*\)\n\1.*//
        $s/.*\n//p
        s/.*\n//
        h' subor.in
    (Ak to chce niekto ako one-liner, tak tu:

    sed -n 'H; g; s/^\(.*\)\n\1.*//; s/\n.*//p; g; $s/^\(.*\)\n\1.*//; $s/.*\n//p; s/.*\n//; h')

    alebo skript v bashi (ktory je ideovo rovnaky):
    #!/bin/bash
    
    while read line; do
        [[ "$line" =~ "$prev".* ]] ||
            echo "$prev"
        oldprev="$prev"
        prev="$line"
    done
    
    [[ "$prev" =~ "$oldprev".* ]] ||
        echo "$prev"
    
    a volanie:

    skript < subor.in
    If you hold a Unix shell up to your ear, you can you hear the C.

    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.