Dostlarım teşekkürler ben de bir deneme yaptım ve çalışmakta.
function doviz($parabirimi) {
$site = file("http://tcmb.gov.tr/kurlar/today.html");
for ($i=11 ; $i< 30 ; $i++) {
if (strpos($site[$i],$parabirimi)==true) { $satir = $i; break; }
}
preg_match("@".$parabirimi."\s+(.*?)\s+(.*?)\s+(.*?)\s+(.*?)\n@si",$site[$satir],$kes1);
preg_match("@".$parabirimi."\s+(.*?)\s+(.*?)\n@si",$site[$satir],$kes2);
if (trim($kes1[3]=="")) { $kes3 = $kes2; } else { $kes3 = $kes1; }
echo $parabirimi."   ALIŞ: " . $kes3[1].", SATIŞ: ".$kes3[2];
}
doviz("PAKİSTAN RUPİSİ");
?>
Arkadaşlarımız bunu daha da geliştirebilirler. Yardımcı olanlara teşekkürler.