milattan önce ye ait bir kod
 <? 


    function bosluk_temizle($kurlar) { 
        $kurlar    = str_replace("  "," ",$kurlar); 
        if(eregi("  ",$kurlar)) { 
            return bosluk_temizle($kurlar); 
        } else { 
            return($kurlar); 
        } 
    } 
    function dolar_kuru() { 
        $kaynak        = @file_get_contents("http://www.tcmb.gov.tr/kurlar/today.html"); 
        $veri        = "|USD/TRY  1 ABD DOLARI(.*?)AUD/TRY(.*?)EUR/TRY  1 EURO(.*?)GBP/TRY|si"; 
                      @preg_match_all($veri,$kaynak,$sonuc,PREG_SET_ORDER); 
        $cikti        = $sonuc[0][1].$sonuc[0][3]; 
        $cikti        = str_replace("\n"," ",$cikti); 
        $cikti        = str_replace("\r"," ",$cikti); 
        $cikti        = trim($cikti); 
        $cikti        = bosluk_temizle($cikti); 
        $parca        = explode(" ",$cikti); 
        return($parca); 
    } 
    $kurlar    = dolar_kuru(); 
    ####### DOLAR 
    $dolar_doviz_alis        = $kurlar[0]; 
    $dolar_doviz_satis        = $kurlar[1]; 
    $dolar_efektif_alis        = $kurlar[2]; 
    $dolar_efektif_satis    = $kurlar[3]; 
    ####### EURO 
    $euro_doviz_alis        = $kurlar[4]; 
    $euro_doviz_satis        = $kurlar[5]; 
    $euro_efektif_alis        = $kurlar[6]; 
    $euro_efektif_satis        = $kurlar[7]; 
     
    ####### Gösterim 
    echo '$1 USD Döviz Alis = '.$dolar_doviz_alis.' YTL<br>'; 
    echo '$1 USD Döviz Satis = '.$dolar_doviz_satis.' YTL<br><br> '; 
    echo '$1 USD Efektif Alis = '.$dolar_efektif_alis.' YTL<br>'; 
    echo '$1 USD Efektif Satis = '.$dolar_efektif_satis.' YTL<br><br>'; 
    echo '€1 EUR Döviz Alis = '.$euro_doviz_alis.' YTL<br>'; 
    echo '€1 EUR Döviz Satis = '.$euro_doviz_satis.' YTL<br><br>'; 
    echo '€1 EUR Efektif Alis = '.$euro_efektif_alis.' YTL<br>'; 
    echo '€1 EUR Efektif Satis = '.$euro_efektif_satis.' YTL<br><br>'; 
?>