Community  »  Perl: Allgemeines Forum

Wert von Attribut auslesen	Seitenanfang
Hallo zusammen Ich habe das Modul HTML::Parser eingebunden. Ich möchte zb. beim Attribut 'a href' vom Tag 'Div' überprüfen welchen Wert enthalten ist, wie zb. www.perlunity.de Weiß vielleicht jemand wie man das realisieren könnte? danke schön mfg _mEMBEr_ Auf etwas antworten ist etwas anderes, als etwas beantworten. Datum: 02.12.2004-10:30
re: Wert von Attribut auslesen	Seitenanfang
#! /usr/bin/perl use strict; use warnings; use HTML::Parser; my @infos; my $p = HTML::Parser->new(); $p->handler(start => \&start_handler,"tagname,attr"); $p->parse_file('html.txt'); sub start_handler{ return if(shift ne 'a'); print shift->{href},"\n ; } ungetestet! Datum: 02.12.2004-15:25
re: Wert von Attribut auslesen	Seitenanfang
Hallo, ich habs so gemacht if (exists($attr->{href})) { if (index($attr, "http:")){ print Datei "\U<h2>http: ist vorhanden\n!</h2>"; } } So kann ich überprüfen ob es sich um einen externen Link oder nur einen internen(Anker, Fußnote) ist. danke für deinen tipp, der hat mir auf die sprünge geholfen gruß _mEMBEr_ Datum: 03.12.2004-10:28