[ fantomas @ 15.09.2005. 20:14 ] @
Nikada nisam radio sa pl i cgl skriptama, pa sam prinudjen da Vas zamolim za pomoc.

Potreban mi je Perl skript sa kojim bih mogao da preuzimam RSS ili XML
od drugih sajtova. Iscitao sam ceo forum ali nigde nisam naisao na objasnjenje kako bi to moglo da se uradi.

U PHPu sam to radio, ali za pl ili cgi nemam predstavu kako bi to moglo da se uradi.

Da li neko moze da mi pomogne?




Puno pozdrava od Ivice.
Hvala Vam sima unapred na pomoci.
jobs center
[ techcode @ 15.09.2005. 22:37 ] @
Da li si cuo za PEAR (php pojam)?

Ako nisi - nema veze. Ako jesi, zamisli da je 100 puta korisniji, 100 puta vise gotovih klasa i sl. (mozda preterujem, a mozda ne).

E to se zove CPAN. http://search.cpan.org

Ukucas tamo sta god da ti treba u search, i 99,9% su sanse da ces naci gotovu klasu koja ti radi ceo ili barem deo posla.

Problem je samo da znas da iskoristis. Treba da znas barem solidno Perl (reference i objekti) a sve imas u dokumentaciji koja stize uz klase (module), kako se koristi, primere i sl. Naravno zavisi od modula do modula - odnosno od onoga ko ga je pisao.

Ukoliko ne znas OOP sa Perl-om ili OOP uopste, preporucujem da potrazis TOOP - Tom's Object Oriented Perl (ili tako nesto). On je deo Perl dokumentacije (distribucije) pa ako imas *nix kucas "man perltoot". Ako imas Win vec se snadji da pronadjes taj fajl u HTML formatu.

Posto sam preko Verata kome je izgleda pukao link (sva sreca pa je [ES] na Veratu) ne mogu da ti kazem sta tacno koji modul da koristis za RSS/XML.

Takodje, nisam siguran kako ti njih "skidas"? Najobicniji http request? U tom slucaju ti treba LWP::Simple ili LWP::UserAgent.

Ne mogu da se setim tacno, ali mislim da su oni deo standardne Perl distribucije (ako ih nisam instalirao, a ne secam se).

Za dalja pitanja :

- moze ovde :)
- http://forums.devshed.com/f6/s
- http://www.perlmonks.org/

[Ovu poruku je menjao techcode dana 15.09.2005. u 23:39 GMT+1]
[ misa vranje @ 13.10.2005. 18:04 ] @
Evo ti script koji to radi:

Code:

#!/usr/bin/perl -w
use strict;
use LWP::Simple;

my ($url,$fh,$file_name);

$url="www.putanja.com/do/xml/fajla.xml";
$file_name="/putanja/do/mesta/gde/treba/da/se/snimi.xml";
open $fh,">$file_name" or die "Fuck!!!\n$!";
print $fh get($url);
close $fh


ako zelis da dodatno obradjujes rss fajl koristi modul XML::RSS(imas dokumenat na www.linux.co.yu) a za jednostavno obradjivanje xml dokumenta koristi XML::Simple.LWP::Simple ide standardno uz perl dok ova dva modul(XML::) ne idu standardno ali se mogu samo iskopirati na server i radice bez problema(XML::Simple doduse malo ograniceno).
@techcode je napisao dobar tut kako se pokrecu cgi scripte za slucaj da neznas

Je li ti to trebalo?