cib arfolyamok xml-ben

Valahol egyszer lattam egy linket a $subject-rol, de azota sem talalom. Te tudod, honnan lehet letolteni?

( trey | 2009. 07. 03., p – 13:54 )

Engem csak az euró érdekelt én 2 perc alatt csináltam magamnak. Olyan formátumban köpi ki, amilyenben nekem kell.

--
trey @ gépház

( Nyosigomboc v | 2009. 07. 03., p – 21:45 )

Az ok, hogy cib, de milyen arfolyam? Erre gondolsz?
http://www.cib.hu/maganszemelyek/arfolyamok/arfolyamok
Mert ha igen, akkor csak parse-olni kell.. bar az MNB sokkal egyszerubb WS-al, es fix a formatuma - egy webes felulettel ellentetben.

szerk: erre illesztesz egy regexpet, es annyi.. utana dumpolod xml-be, ha mindenkepp arra vagysz: 


		deviza_sell=new Array( 1, 10.64, 157.01, 169.86, 181.53, 196.96, 2.0525, 25.3, 275.74, 30.74, 322.81, 37.04, 40.84, 63, 65.64,0);
		deviza_buy=new Array( 1, 10.28, 151.61, 164.02, 175.29, 190.18, 1.9819, 24.42, 266.26, 29.68, 311.71, 35.76, 33.42, 60.84, 63.06,0);
		valuta_sell=new Array( 1, 10.88, 160.48, 173.62, 185.55, 201.31, 2.0979, 25.85, 281.84, 31.42, 329.95, 37.86, 40.84, 64.4, 72.07,0);
		valuta_buy=new Array( 1, 10.04, 148.14, 160.26, 171.27, 185.83, 1.9365, 23.87, 260.16, 29, 304.57, 34.94, 33.42, 59.44, 56.63,0);

--
"ne támogasd az erdők kiírtását mozijeggyel, töltsd le a netről!" - killllll, asva.info

( kilvadi | 2009. 07. 04., szo – 00:41 )

perlben osszehanyva, mert nekem is gyorsan kellett.
csak vetel es eladas van, de 1perc es rajossz a kozeparfolyamra.
jah es ez a penztari deviza, valutara csak a ru_type-ot kell kicserelni. 


#!/usr/bin/perl
$|=1;

use strict;
use LWP::UserAgent;
use POSIX;


stbb... stb..

******** tiz perc szarakodas utan *********

nahjo.. nem szenvedek tovabb.
az editor elszabja a kodot, ha kell a perl kod, dobj egy emailt.

Frankón fut Linuxon, de a minap átvittem egy windowsos gépre és meg se nyekken a szkript. Mi lehet a gond? (perlhez továbbra sem értek ezért lövésem sincs, hogy hol keressem a hibát!) Hibaüzenet nincs, "fut" de nem csinál semmit, amikor megszakítom (kb 5 perc után) akkor meg "Terminating on signal SIGINT(2)"-vel tér vissza.