nicht angemeldet
url
#!c:/perl/perl
$url = "http://www.tigerweb.de/internet/index.htm"; open (URL, $url); @url = <URL>; close (URL); print "content-type:text/html\n\n"; print @url;
Warum funzt das Teil nicht ?
Tiger
-
$url = "http://www.tigerweb.de/internet/index.htm"; open (URL, $url);
»» ...
Warum funzt das Teil nicht ?
Weil open () nur lokale Dateien öffnet und nicht http-Kommunikationspfade aufbaut. Was Du offenbar brauchst, ist get () aus LPW::Simple (CPAN-Modul).
Siehe u. a. ../../sfarchiv/1999_1/t02435.htm#a11416
-
$url = "http://www.tigerweb.de/internet/index.htm"; open (URL, $url); »» ... Warum funzt das Teil nicht ?
Weil open () nur lokale Dateien öffnet und nicht http-Kommunikationspfade aufbaut. Was Du offenbar brauchst, ist get () aus LPW::Simple (CPAN-Modul).
Siehe u. a. ../../sfarchiv/1999_1/t02435.htm#a11416
Habe versucht das Modul zu kapieren, aber da spielen ja zig(!) andere Module mit hinein. Weiß jemand Code, ohne dass dieser Module verwendet. Tiger
-
Siehe u. a. ../../sfarchiv/1999_1/t02435.htm#a11416
Habe versucht das Modul zu kapieren, aber da spielen ja zig(!) andere Module mit hinein. Weiß jemand Code, ohne dass dieser Module verwendet.
Du must ja bloß die Funktion "get()" aufrufen. Was die intern macht, kann Dir egal sein. Willst Du wirklich das Rad neu erfinden? Das können leicht ein paar hundert Zeilen oder noch mehr werden. Dann lieber libwww.pl installieren ... bei einem guten Perl-Interpreter ist das wahrscheinlich schon dabei (z. B. bei ActivePerl für Win32).
-
-