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 17:35 | Bezpečnostní upozornění

Německá Bundesnetzagentur (obdoba českého ČTU) zakázala na německém území prodej panenky Cayla kvůli „špionáži“ dětí. Tato elektronická hračka obsahuje mikrofon, reproduktor a kameru a bezdrátové komunikační rozhraní, pomocí kterého se hračka připojuje na servery výrobce. Takovýmto způsobem může hračka pomocí umělé inteligence „odpovídat“ na dotazy dítěte. Hlavní problém bude ale asi někde jinde, podle prvotních zpráv může

… více »
Petr Tomášek | Komentářů: 21
17.2. 15:30 | Bezpečnostní upozornění

CSIRT.CZ upozorňuje, že bezpečnostní experti objevili nový typ malwaru, jenž cílí na open source e-commerce platformu Magento. Malware je zajímavý tím, že se jedná o první svého druhu, jehož kód zůstává skrytý v SQL databázi zasaženého e-shopu. Škodlivý kód je volán pomocí tzv. SQL trigerru, který je spouštěn při každém vytvoření objednávky v systému.

Ladislav Hagara | Komentářů: 0
17.2. 09:00 | Nová verze

Bylo vydáno Ubuntu 16.04.2 LTS, tj. druhé opravné vydání Ubuntu 16.04 LTS s kódovým názvem Xenial Xerus. Přehled novinek v poznámkách k vydání a v přehledu změn.

Ladislav Hagara | Komentářů: 37
17.2. 06:00 | Zajímavý článek

Pavel Tišnovský se v dvoudílném článku na MojeFedora.cz věnuje tvorbě pluginů (modulů) pro bitmapový grafický editor GIMP. Pomocí pluginů lze GIMP rozšiřovat o další funkce. Implementovat lze například nové filtry nebo pomocné utility pro tvorbu animací či poloautomatickou retuš snímků.

Ladislav Hagara | Komentářů: 6
16.2. 23:32 | Komunita

Do 30. března se lze přihlásit do dalšího kola programu Outreachy, jehož cílem je přitáhnout do světa svobodného a otevřeného softwaru lidi ze skupin, jež jsou ve světě svobodného a otevřeného softwaru málo zastoupeny. Za 3 měsíce práce, od 30. května do 30. srpna 2017, v participujících organizacích lze vydělat 5 500 USD. Jedná se již o 14. kolo tohoto programu.

Ladislav Hagara | Komentářů: 11
16.2. 23:13 | Nová verze

Byla vydána verze 0.92.1 svobodného multiplatformního vektorového grafického editoru Inkscape. Přehled novinek v poznámkách k vydání. Řešen je mimo jiné problém s verzí 0.92, jež rozbíjí dokumenty vytvořené v předchozích verzích Inkscape. Více v příspěvku na blogu Davida Revoye, autora open source webového komiksu Pepper&Carrot nebo portrétu GNU/Linuxu.

Ladislav Hagara | Komentářů: 0
16.2. 16:26 | Bezpečnostní upozornění

Byla vydána verze 1.1.0e kryptografické knihovny OpenSSL. Dle bezpečnostního upozornění 20170216 byla opravena závažná bezpečnostní chyba CVE-2017-3733.

Ladislav Hagara | Komentářů: 1
16.2. 13:03 | Pozvánky

GNOME hackaton proběhne v Brně na FIT VUT v Red Hat Labu (budova Q) v pondělí 20. února od 15:00. Registrace není nutná, ale pokud dáte na FaceBooku vědět, že plánujete dorazit, pomůže to s plánováním.

Ladislav Hagara | Komentářů: 0
16.2. 13:02 | Pozvánky

Únorový Prague Containers Meetup se koná 21. února v budově MSD. Můžete se těšit na přednášky o tom, proč a jak používat kontejnery a zároveň získat zajímavý pohled na historii a budoucnost kontejnerů.

little-drunk-jesus | Komentářů: 0
16.2. 08:55 | Zajímavý software

Google na svém blogu věnovaném vývojářům oznámil vydání verze 1.0 open source knihovny pro strojové učení TensorFlow (Wikipedie). Přehled novinek v poznámkách k vydání na GitHubu. Zdrojové kódy TensorFlow jsou k dispozici pod licencí Apache 2.0.

Ladislav Hagara | Komentářů: 0
Jak se stavíte k trendu ztenčování přenosných zařízení (smartphony, notebooky)?
 (13%)
 (2%)
 (72%)
 (3%)
 (10%)
Celkem 656 hlasů
 Komentářů: 52, poslední 13.2. 12:45
Rozcestník
Reklama

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: 73 | blog: Výlevníček | JO70FB
Rozbalit Rozbalit vše Re: Perl parser cvs do sql
Udělat z toho comma separated values? tr ";" ","
Vox agroferti, vox Dei.
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: 73 | 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.
Vox agroferti, vox Dei.
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.