HTML Datei abschneiden
Larry
- perl
0 CK1
Hallo!
Hie kann ich das Ende einer HTML Datei abschneiden? Ich möche es genau nach dem
Platzhalter <!-- END --> abschneiden?
Danke!
mfg Larry
Hi,
Hie kann ich das Ende einer HTML Datei abschneiden? Ich möche es
genau nach dem Platzhalter <!-- END --> abschneiden?
Also, lies die Datei in einen Array:
open(DAT,"<html_datei.htm");
@inhalt = <DAT>;
close(DAT);
Dann zeilenweise durchsuchen, ob <!-- END --> darin enthalten ist:
my $i = 0;
my $vorhanden = 0;
for($i=0;$i<=$#inhalt;$i++)
{
if (index($inhalt[$i], "<!-- END -->") <> -1)
{
$vorhanden = 1;
break;
}
}
if ($vorhanden)
{
$inhalt[$i] = substr(0,index($inhalt[$i], "<!-- END -->"));
} else {
print "Dateiende leider nicht gefunden!";
}
my $j = 0;
for($j=0; $j<=$i;$j++)
{
print $inhalt[$j];
}
Das gibt die HTML-Datei bis <!-- END --> aus.
mfg
CK1
Hallo auch!
Hi,
Hie kann ich das Ende einer HTML Datei abschneiden? Ich möche es
genau nach dem Platzhalter <!-- END --> abschneiden?Also, lies die Datei in einen Array:
Dann zeilenweise durchsuchen, ob <!-- END --> darin enthalten ist:
Man kann die Datei auch einfach komplett bis zum <!-- END --> einlesen, indem man die "Zeilenbegrenzung" auf eben diesen String setzt:
open(DAT,"<html_datei.htm");
$/ = '<!-- END -->';
$inhalt = <DAT>;
close(DAT);
Jetzt enthält $inhalt die gesamte Datei bis zur Begrenzung (einschließlich dieser).
Jörk