Dotaz: Parsovani v Bashi

[JK]

Hezky den vsem,

Potreboval bych pomoct trosku.. Mam zadanou adresu a podle zdrojoveho kodu stranky mam jenom vytahnout informace. Je to stranka o pocasi, kde mam dve casti dne, a teploty u nich a potreboval bych jenom vystrihnout cast dne a teplotu..

Dekuju

JK

---

---

Odpovědi

[pek]

Třeba:

wget -O - http://example.com | grep "Dnes je:"

Ale domácí úkoly by si měl každý napsat sám :^)

[loki]

Hod sem adresu, aby se dalo treba podle oddelovacu postavit nejaky regularni vyraz nebo awk skriptik.

[JK]

Příloha:

• pocasi.html (105318 bytů)

Prilohu si musis pretahnout k sobe a pak uz to normalne otevres jako www a pak staci otevrti zdrojak..

[NeoV]

Perl skript:

#!/usr/bin/perl


use strict;
use LWP::Simple;

my $content = Encode::encode("windows-1250", get "http://www.abclinuxu.cz/data/prilohy/9/9/175399-pocasi-1837466145685031135.html");

while ($content =~ m~<div class="cDay"[^<]*<h4>([^<]*)</h4>[^<]*<[^<]*<a\s[^>]*>([^<]*)</a>[^<]*<br[^<]*<a\s[^<]*<[^<]*<[^<]*<p>([^<]*)[^<]*<[^<]*<[^<]*<[^<]*<[^<]*<a\s[^>]*>([^<]*)</a>[^<]*<br[^<]*<a\s[^<]*<[^<]*<[^<]*<p>([^<]*)~isg)
{
        print "$1 - $2 - $3 - $4 - $5\n";
}

Vysledok:

$ perl script.pl
Čtvrtek - Ráno - 7/11 - Odpoledne - 24/28
Pátek - Ráno - 12/16 - Odpoledne - 16/20
Sobota - Ráno - 6/10 - Odpoledne - 17/21