nicht angemeldet
Hallo,
hier sind mal 4 Möglichkeiten, aus einem PERLScript heraus eine HTML - Seite zum Browser zu schicken - zum Ausprobieren / Diskutieren / Archivieren ;-)
1. Die Seite wird lokal geöffnet, auf ein Array gelesen und mit print wieder ausgegeben
Beispiel:
$urce = "c:/.../homepage/erfurt.htm";
open (URL, $urce);
@dok = <URL>;
close (URL);
print "content-type:text/html\n\n";#header erforderlich!
print @dok;
***
2. Holen einer Seite mit dem LWP-Modul
Beispiel:
use LWP::Simple;
$doc = get 'http://homepage'; #was heisst hier hacken?
print "content-type:text/html\n\n";#header erforderlich!
print $doc;
***
3. Mit print location, der Benutzer wird zum anderen URL geleitet
Beispiel:
$dok = "http://homepage"; #Pfad relativ oder absolut
print "location: $dok";
4. Redirection mit CGI.PM, der Benutzer wird zum anderen URL geleitet
Beispiel:
use CGI;
$q = new CGI;
print $q->redirect('http://homepage');
***
Viel Spaß beim Ausprobieren und ein schönes Pfingstfest, Euer Rolf