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í
×
eParkomat, startup z ČR, postoupil mezi finalisty evropského akcelerátoru ChallengeUp!
Robot na pivo mu otevřel dveře k opravdovému byznysu
Internet věcí: Propojený svět? Už se to blíží...
včera 16:24 | Nová verze

Byla vydána Mageia 5.1. Jedná se o první opravné vydání verze 5, jež vyšla v červnu loňského roku (zprávička). Uživatelům verze 5 nepřináší opravné vydání nic nového, samozřejmě pokud pravidelně aktualizují. Vydání obsahuje všechny aktualizace za posledního téměř půldruhého roku. Mageia 5.1 obsahuje LibreOffice 4.4.7, Linux 4.4.32, KDE4 4.14.5 nebo GNOME 3.14.3.

Ladislav Hagara | Komentářů: 0
včera 13:42 | Pozvánky

V Praze probíhá konference Internet a Technologie 16.2, volné pokračování jarní konference sdružení CZ.NIC. Konferenci lze sledovat online na YouTube. K dispozici je také archiv předchozích konferencí.

Ladislav Hagara | Komentářů: 0
2.12. 22:44 | Komunita

Joinup informuje, že Mnichov používá open source groupware Kolab. V srpnu byl dokončen dvouletý přechod na toto řešení. V provozu je asi 60 000 poštovních schránek. Nejenom Kolabu se věnoval Georg Greve ve své přednášce Open Source: the future for the European institutions (SlideShare) na konferenci DIGITEC 2016, jež proběhla v úterý 29. listopadu v Bruselu. Videozáznam přednášek z hlavního sálu je ke zhlédnutí na Livestreamu.

Ladislav Hagara | Komentářů: 18
2.12. 15:30 | Zajímavý projekt

Společnost Jolla oznámila v příspěvku Case study: Sailfish Watch na svém blogu, že naportovala Sailfish OS na chytré hodinky. Využila a inspirovala se otevřeným operačním systémem pro chytré hodinky AsteroidOS. Použita je knihovna libhybris. Ukázka ovládání hodinek na YouTube.

Ladislav Hagara | Komentářů: 8
2.12. 14:15 | Nová verze

Byla vydána verze 7.1.0 skriptovacího jazyka PHP používaného zejména k vývoji dynamických webových stránek. Jedná se o první stabilní verzi nejnovější větvě 7.1. Přehled novinek v dokumentaci. Podrobnosti v ChangeLogu. K dispozici je také příručka pro přechod z PHP 7.0.x na PHP 7.1.x.

Ladislav Hagara | Komentářů: 2
2.12. 12:55 | Nová verze

Google Chrome 55 byl prohlášen za stabilní. Nejnovější stabilní verze 55.0.2883.75 tohoto webového prohlížeče přináší řadu oprav a vylepšení (YouTube). Opraveno bylo také 36 bezpečnostních chyb. Mariusz Mlynski si například vydělal 22 500 dolarů za 3 nahlášené chyby (Universal XSS in Blink).

Ladislav Hagara | Komentářů: 4
2.12. 11:55 | Pozvánky

Máte rádi svobodný software a hardware nebo se o nich chcete něco dozvědět? Přijďte na 135. sraz spolku OpenAlt, který se bude konat ve čtvrtek 8. prosince od 18:00 v Radegastovně Perón (Stroupežnického 20, Praha 5). Sraz bude tentokrát tématický. Bude retro! K vidění budou přístroje jako Psion 5mx nebo Palm Z22. Ze svobodného hardwaru pak Openmoko nebo čtečka WikiReader. Přijďte se i vy pochlubit svými legendami, nebo alespoň na pivo. Moderní hardware má vstup samozřejmě také povolen.

xkucf03 | Komentářů: 0
2.12. 00:10 | Nová verze

Byla vydána verze 3.2 svobodného systému pro detekci a prevenci průniků a monitorování bezpečnosti počítačových sítí Suricata. Z novinek lze zmínit například podporu protokolů DNP3 a CIP/ENIP, vylepšenou podporu TLS a samozřejmě také aktualizovanou dokumentaci.

Ladislav Hagara | Komentářů: 0
1.12. 21:00 | Nová verze

Byla vydána beta verze Linux Mintu 18.1 s kódovým jménem Serena. Na blogu Linux Mintu jsou hned dvě oznámení. První o vydání Linux Mintu s prostředím MATE a druhé o vydání Linux Mintu s prostředím Cinnamon. Stejným způsobem jsou rozděleny také poznámky k vydání (MATE, Cinnamon) a přehled novinek s náhledy (MATE, Cinnamon). Linux Mint 18.1 bude podporován až do roku 2021.

Ladislav Hagara | Komentářů: 0
1.12. 16:42 | Nová verze

Byl vydán Devuan Jessie 1.0 Beta 2. Jedná se o druhou beta verzi forku Debianu bez systemd představeného v listopadu 2014 (zprávička). První beta verze byla vydána v dubnu letošního roku (zprávička). Jedna z posledních přednášek věnovaných Devuanu proběhla v listopadu na konferenci FSCONS 2016 (YouTube, pdf).

Ladislav Hagara | Komentářů: 0
Kolik máte dat ve svém domovském adresáři na svém primárním osobním počítači?
 (32%)
 (24%)
 (29%)
 (7%)
 (5%)
 (3%)
Celkem 767 hlasů
 Komentářů: 50, poslední 29.11. 15:50
Rozcestník
Reklama

Dotaz: odstraneni "temer" dupllicitniho radku

25.1.2008 10:01 Cejvik | skóre: 5
odstraneni "temer" dupllicitniho radku
Přečteno: 300×
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: 44 | 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.