[PHP]Kurs walut nie działa Opcje

[kda]

Witam,

Mam problem ze skryptem który kiedyś gdzieś znalazłem w sieci, dawno go nie używałem, a na chwilę obecną potrzebuję z niego korzystać ale wywala błąd w linii:
Warning: Invalid argument supplied for foreach() in /volume1/web/waluta.php on line 42
linia 42

[PHP] pobierz, plaintext 
foreach($index['NAZWA_WALUTY'] as $value) {
[PHP] pobierz, plaintext 

oto skrypt, dodam że nic w nim nie zmieniałem gdy za dobrych czasów działał.

[PHP] pobierz, plaintext 
// Początek pobierania linku do kursu walut w formacie XML...
$connect = fsockopen('www.nbp.pl', 80, $errno, $errstr, 10);
if (!$connect)
    die($errstr.' ('.$errno.')');
else
{
    fwrite($connect, 'GET /kursy/kursya.html HTTP/1.1'."\r\n".'Host: www.nbp.pl'."\r\n".'Connection: close'."\r\n\r\n") or die('Błąd przy wysyłaniu żądania: '.$errstr);
}
while(!feof($connect)) {
    $link .= fread($connect, 4096);
}
fclose($connect);
 
$link = '/kursy/'.substr(strstr($link, 'xml/'), '0', '19');
// Koniec. Link w zmiennej $link.
 
// Pobieranie arkusza XML
$connect = fsockopen('www.nbp.pl', 80, $errno, $errstr, 10);
if (!$connect)
    die($errstr.' ('.$errno.')');
else
{
    fwrite($connect, 'GET '.$link.' HTTP/1.1'."\r\n".'Host: www.nbp.pl'."\r\n".'Connection: close'."\r\n\r\n") or die('Błąd przy wysyłaniu żądania: '.$errstr);
}
while (!feof ($connect)) {
    $info .= fgets($connect, 4096);
}
 
$info = explode('
 
', $info);
 
$info = str_replace(array('  ' ,'
'), array('', ''), $info[1]);
 
$p = xml_parser_create('ISO-8859-1');
xml_parse_into_struct($p, $info, $vals, $index);
xml_parser_free($p);
 
foreach($index['NAZWA_WALUTY'] as $value) {
    $waluta[$vals[$value+2]['value']]['name'] = $vals[$value]['value'];
    $waluta[$vals[$value+2]['value']]['ratio'] = $vals[$value+1]['value'];
    $waluta[$vals[$value+2]['value']]['kurs'] = $vals[$value+3]['value'];
}
 
echo $waluta['USD']['name'].'<br> <b>(USD)</b>: <b>'.$waluta['USD']['kurs'].'</b><br> '.$waluta['EUR']['name'].' <B>(EUR)</B>: <B>'.$waluta['EUR']['kurs'].'</B>';
[PHP] pobierz, plaintext 

Z góry dzięki za pomoc