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í
×

včera 12:55 | Nová verze

Byla vydána verze 17.12.0 KDE Aplikací (KDE Applications). Přehled novinek v kompletním seznamu změn a na stránce s dalšími informacemi. Aplikace, které nebyly dosud portovány na KDE Frameworks 5, byly z KDE Aplikací odstraněny.

Ladislav Hagara | Komentářů: 18
včera 03:00 | Komunita

Na Humble Bundle lze získat počítačovou hru Company of Heroes 2 (Wikipedie, YouTube) běžící také v Linuxu zdarma. Speciální akce končí v sobotu v 19:00.

Ladislav Hagara | Komentářů: 0
včera 02:00 | Zajímavý software

Christian Kellner představil na svém blogu projekt Bolt řešící bezpečnost rozhraní Thunderbolt 3 na Linuxu. Pomocí příkazu boltctl nebo rozšíření GNOME Shellu lze komunikovat s démonem boltd a například zakázat neznámá zařízení a předejít tak útokům typu Thunderstrike nebo DMA.

Ladislav Hagara | Komentářů: 6
včera 01:00 | Nová verze

Po půl roce vývoje od vydání verze 11.0 byla vydána verze 11.1 svobodného softwaru pro vytváření datových úložišť na síti FreeNAS (Wikipedie). Nejnovější FreeNAS je postaven na FreeBSD 11.1. Přehled novinek v příspěvku na blogu. Zdůraznit lze zvýšení výkonu OpenZFS, počáteční podporu Dockeru nebo synchronizaci s cloudovými službami Amazon S3 (Simple Storage Services), Backblaze B2 Cloud, Google Cloud a Microsoft Azure

Ladislav Hagara | Komentářů: 0
14.12. 23:55 | Nová verze

Po dvou měsících vývoje od vydání verze 235 oznámil Lennart Poettering vydání verze 236 správce systému a služeb systemd (GitHub, NEWS).

Ladislav Hagara | Komentářů: 6
14.12. 20:00 | Nová verze Ladislav Hagara | Komentářů: 0
14.12. 19:33 | Pozvánky

Pražská Fedora 27 Release Party, oslava nedávného vydání Fedory 27, se uskuteční 19. prosince od 19:00 v prostorách společnosti Etnetera (Jankovcova 1037/49). Na programu budou přednášky o novinkách, diskuse, neřízený networking atd.

Ladislav Hagara | Komentářů: 0
14.12. 18:11 | Nová verze

Byla vydána verze 2.11.0 QEMU (Wikipedie). Přispělo 165 vývojářů. Provedeno bylo více než 2 000 commitů. Přehled úprav a nových vlastností v seznamu změn.

Ladislav Hagara | Komentářů: 0
14.12. 17:44 | Komunita

Canonical oznámil dostupnost kryptografických balíčků s certifikací FIPS 140-2 úrovně 1 pro Ubuntu 16.04 LTS pro předplatitele podpory Ubuntu Advantage Advanced. Certifikace FIPS (Federal Information Processing Standards) jsou vyžadovány (nejenom) vládními institucemi USA.

Ladislav Hagara | Komentářů: 3
14.12. 16:11 | Zajímavý software

Společnost Avast uvolnila zdrojové kódy svého dekompilátoru RetDec (Retargetable Decompiler) založeného na LLVM. Vyzkoušet lze RetDec jako webovou službu nebo plugin pro interaktivní disassembler IDA. Zdrojové kódy RetDec jsou k dispozici na GitHubu pod open source licencí MIT.

Ladislav Hagara | Komentářů: 3
Jak se vás potenciálně dotkne trend odstraňování analogového audio konektoru typu 3,5mm jack z „chytrých telefonů“?
 (8%)
 (1%)
 (1%)
 (1%)
 (76%)
 (14%)
Celkem 997 hlasů
 Komentářů: 45, poslední 1.12. 19:00
    Rozcestník

    Dotaz: Perl parser cvs do sql

    27.2.2009 17:48 Ivan
    Perl parser cvs do sql
    Přečteno: 449×

     

    Zdavim, neviete mi niekto pomoc surne zhanam nejaky Perl Parser nasiel som iba PHP parser ktory mi je v mojom pripade zbytocny uz som bezradny... Ide hlavne  aby dokazal velke cvs-ko vyparsovat do sql-ka co je samozrejme...

    priklad subor cvs obsahuje: data.cvs

    ID|MENO|VYSKA|VAHA
    1;janko;180;75
    2;ferko;195;90

    a potrebujem to dostat do tvaru

    insert into zoznam values('1','janko','180','75' );
    insert into zoznam values('2','ferko','195','90' );

    Ale CVS-kovy subor ma asi 8MB.

    Velmi pekne dakujem.

    Odpovědi

    27.2.2009 18:57 tom
    Rozbalit Rozbalit vše Re: Perl parser cvs do sql
    Nemyslite spis csv - comma separated values? Jinak parser mi prijde jako kanon na vrabce, split a join vam nestaci? perl -lnaF\; -e "print \"insert into zoznam values('\", join(\"','\",@F), \"')\\;\";"
    28.2.2009 05:36 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Perl parser cvs do sql
    "Někdy to opravdu nestčí ;-)"; že...
    28.2.2009 12:19 tom
    Rozbalit Rozbalit vše Re: Perl parser cvs do sql
    V tom formatu se maji matchovat uvozovky nebo narazite na neco jineho? Ja myslel, ze oddelovaci znak se vzdy voli tak, aby se nevyskytoval v datech.
    28.2.2009 12:57 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Perl parser cvs do sql
    Vždy právě ne, a zrovna u CSV to neplatí.
    28.2.2009 14:19 tom
    Rozbalit Rozbalit vše Re: Perl parser cvs do sql
    Tak pak staci jen trochu upravit, podle ceho se to rozseka: perl -na -e 's/(?:"(.*?)"|(.*?))[;\n]/$1$2\000/g; print "insert into zoznam values'"('\", join(\"','\", split /\\000/), \"'"');\n";'
    28.2.2009 16:45 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Perl parser cvs do sql
    "Myslíte?"";-)"""
    27.2.2009 19:00 myšák | skóre: 26 | blog: EmentuX | Ostrava
    Rozbalit Rozbalit vše Re: Perl parser cvs do sql

    A můžu se zeptat proč tahat na něco takového PERL parser, když na to stačí např. AWK?

    #!/usr/bin/awk -f
    BEGIN { FS=";" };
    {
    printf("insert into zoznam values('%s','%s','%s','%s');\n", $1, $2, $3, $4);
    }
    
    Je nesmírně těžké být idiotem, konkurence je obrovská...
    28.2.2009 05:35 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Perl parser cvs do sql
    A data

    echo; ahoj; "světe; exit"; "vám to rozparsuje jistě také správně, že ;)"
    28.2.2009 16:03 myšák | skóre: 26 | blog: EmentuX | Ostrava
    Rozbalit Rozbalit vše Re: Perl parser cvs do sql
    To samozřejmě ne ... nicméně pro výše uvedené zadání to bohatě stačí ;-)
    Je nesmírně těžké být idiotem, konkurence je obrovská...
    28.2.2009 16:47 Ash | skóre: 53
    Rozbalit Rozbalit vše Re: Perl parser cvs do sql
    Jasně, promiň, četl jsem jen první odstavec zadání :D I když ty "janko,ferko" by mohly sváděly k domněnce že to může být jen ukázkové zjednodušení.
    27.2.2009 19:47 maxik
    Rozbalit Rozbalit vše Re: Perl parser cvs do sql
    Zkuste priste trochu hledat! Uplne, ale NAPROSTO stejny problem a taky pomoci perlu se resi tady:

    http://www.linuxsoft.cz/article.php?id_article=1061
    28.2.2009 16:53 Ivan
    Rozbalit Rozbalit vše Re: Perl parser cvs do sql

    Nasiel som len nieco taketo: ale odeluje mi to len slova odelovane ciarkou "," skusal som to nejako upravit ale je to marne nevedeli by ste s tym niekto pohnut? aby my to bralo oddelene data bodko-ciarkou ";"?

    #!/usr/bin/perl

    # PERL MODULE
    use Text::CSV::Simple;
       
    # script

    my $tplSQL = "INSERT INTO country (short_code, name) VALUES (\"%s\",\"%s\");\n";
    my $csvFile="codes.csv";

    my $parser = Text::CSV::Simple->new();
    my @data = $parser->read_file($csvFile);

    foreach(@data) {
            printf $tplSQL, @$_[1], @$_[2];
    };

    Jendа avatar 28.2.2009 18:26 Jendа | skóre: 74 | blog: Výlevníček | JO70FB
    Rozbalit Rozbalit vše Re: Perl parser cvs do sql
    Udělat z toho comma separated values? tr ";" ","
    Why did the multithreaded chicken cross the road? to To other side. get the
    28.2.2009 18:30 Ivan
    Rozbalit Rozbalit vše Re: Perl parser cvs do sql

    Do perlu sa velmi nerozumiem nemohol by si to uviest na priklade?

    Jendа avatar 28.2.2009 18:37 Jendа | skóre: 74 | blog: Výlevníček | JO70FB
    Rozbalit Rozbalit vše Re: Perl parser cvs do sql
    To není perl - cat tvuj_soubor | tr ";" "," > soubor.csv. A ten perlový skript pustíš až na ten soubor.csv.
    Why did the multithreaded chicken cross the road? to To other side. get the
    28.2.2009 19:15 Ladicek | skóre: 28 | blog: variace | Havlíčkův brod
    Rozbalit Rozbalit vše Re: Perl parser cvs do sql
    Já bych spíš šel do dokumentace, a udělal my $parser = Text::CSV::Simple->new({ sep_char => ';' });. Myslím, že to bude o něco spolehlivější ;-)
    Ještě na tom nejsem tak špatně, abych četl Viewegha.

    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.