Novo

Forum kao aplikacija na telefonu

Dodajte forum na početni ekran i koristite ga kao aplikaciju, sa menijem na dnu ekrana.

  • 1 odgovor
  • 3.882 pregleda

Najnovija ↓

Parsirati specificne tagove... 04.04.2007. u 09:10 · pre 238 meseci #1
Kako parsirati specificne tagove, recimo sledeceg oblika <!-- Nesto--> izmedju <!-- Nesto --> meni treba ono izmedju da se izvadi.

evo koda koji vadi iz obicnih tagova reci
recimo tagova title

Code:

sub change {
    my ($html) = shift;
    my $p = HTML::TokeParser->new(\$html);
    my $body = $p->get_tag("title");
    my $text = $p->get_trimmed_text("/title");
    $text =~ s/\240/ /g; 
    $text =~ s/\s+/ /g;
    $text;
}


inace u pitanju je parsiranje html stranica....u ovom mom slucaju...
Potpis
Vaske
Re: Parsirati specificne tagove... 05.04.2007. u 12:53 · pre 238 meseci
izmenjeno 1 put, poslednji put vaske555 09.04.2007. u 12:06
  1. vaske55509.04.2007. u 12:06zapis iz teksta poruke
#2
uradio sam ja

Code:



.... 
    my $ua = new LWP::UserAgent;
    $url =~ s/^"//;
    $url =~ s/"$//;
    my $res = $ua->get($url);
    $pom =  $res->content;
    $text2 = $pom;
    $text2 =~ s/\n//g;  # stavite da bude sve u jednom redu...:)

    if ($text2 =~ /<!-- BLA BLA -->(.*?)<!-- BLA BLA -->/){
        $text2 = $1;
     }
     



inspirise me izgleda kada postavim topik...:)
Potpis
Vaske
Prijavite se da biste odgovorili u ovoj temi.PrijavaRegistracija

Premeštanje teme