Opened by tuturutka at 2006-02-17 18:21
User since
2003-08-11
457 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-08-11
457 Artikel
BenutzerIn
[quote=tuturutka,17.02.2006, 18:42]Ja, das mit $vor=~$elem habe ich gesehen, nachdem ich die Frage geschrieben habe. Ich glaube, es sollte $vor=~"$elem" sein.
[/quote]
Wenn du einen String mit einem anderen vergleichen moechtest, dann so
Wie's scheint versuchst du Sachen aus einem HTML-Dokument zu extrahieren, nimm besser
HTML::TreeBuilder oder HTML::Parser.
Zu letzterem gibt es einen Artikel im Wiki: HTML parsen mit HTML::Parser
[/quote]
Wenn du einen String mit einem anderen vergleichen moechtest, dann so
Code: (dl
)
if( $foo eq $bar ) { # wenn $foo gleich $barQuoteVielleicht muss ich meinen Datenstruktur zeigen
Code: (dl )1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19$/="</tr>";
my $testfile;
my @multiarray=();
my @character=();
$testfile = $ARGV[0];
open (FILE, $testfile)or die "Kann FILE nicht geoeffnet werden\n";
while (my $in1 = <FILE>){
chomp ($in1);
my @array= split(/\n/,$in1);
my @character =();
foreach $in1 (@array) {
if ($in1=~ /Arial\">(.*?)<\/font>/gio) {
push @character,$1;
}
}
push @multiarray, [@character];
}
close (FILE) or die "Kann FILE nicht geschlossen werden!\n";
Wie's scheint versuchst du Sachen aus einem HTML-Dokument zu extrahieren, nimm besser
HTML::TreeBuilder oder HTML::Parser.Zu letzterem gibt es einen Artikel im Wiki: HTML parsen mit HTML::Parser
,,Das perlt aber heute wieder...'' -- Dittsche