Just nu i M3-nätverket
Jump to content

Hämta websida i PERL??


Enfor©er

Recommended Posts

Hej!

 

Jag undrar om nån vet hur om man på ett enkelt sätt kan läsa in en URL??

 

 

---

”Windows XP - Nu fler musklick än någonsin.” :)

---

Powered by: FreeBSD 4.6 // Pentium IV @ 1,4 GHz

Powered by: FreeBSD 4.5 // Pentium II @ 400.91 MHz

 

 

*********

Jag flyttar denna tråd till forumet för CGI/Perl

 

Vänliga Hälsningar

Kristoffer, moderator för Programmering

*********

[inlägget ändrat 2002-10-24 07:43:40 av Kristianstad]

Link to comment
Share on other sites

  • 2 weeks later...

Du får utveckla din fråga, på vilket sätt skall URLn läsas in? Från en textfil? eller från STDIN?

 

Sedan är det också bra att veta vad du skall använda URLn till, så är det lättare att ge ett bra svar.

 

 

*fluff*

============================

”The future is already here,

it’s just unevenly distributed”

 

Link to comment
Share on other sites

Det jag hade tänkt var att låta mitt script hämta en sida med intressant information (tex. TV.nu), filtrera den, å sen visa det intressanta direkt på "skrivbordet". Detta i FreeBSD, för att visa informationen på skrivbordet tänkte jag använda root-tail (skriver ut en text-fils innehåll på skrivbordet vid x och y koord. ).

 

* Mitt problem:

Kan inte säga att jag kan programmera i PERL, men jag lyckades läsa in en text-fil jag hade lokalt till en "@lista" och då fick jag ju en rad/item, tänkte mig nått liknade. Fast ta sidan från internet..

 

---

”Windows XP - Nu fler musklick än någonsin.” :)

---

Powered by: FreeBSD 4.6 // Pentium IV @ 1,4 GHz

Powered by: FreeBSD 4.5 // Pentium II @ 400.91 MHz

 

Link to comment
Share on other sites

Ja, i Perl så har du ett flertal möjligheter, tex kan du installera ett bibliotek som heter LWP och läsa dess dokumentation för LWP

use LWP::Simple;

$req = get("http://www.ex.org");

så kommer $req att innehålla sidan om det blir en lyckad request.

 

LWP hittar du om du söker på LWP på http://search.cpan.org

 

installationen följer en vanlig *nix-installtion;

packa upp: tar zvxf <paket>
perl Makefile.PL
make
make install

 

Lycka till!

 

 

*fluff*

============================

”The future is already here,

it’s just unevenly distributed”

 

Link to comment
Share on other sites

tackar..

 

ska ta en titt på det där. :)

 

---

”Windows XP - Nu fler musklick än någonsin.” :)

---

Powered by: FreeBSD 4.6 // Pentium IV @ 1,4 GHz

Powered by: FreeBSD 4.5 // Pentium II @ 400.91 MHz

 

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.



×
×
  • Create New...