<?php
  #@author ismet işcan (Dr.iq)
  #@copyright 2008
 
function ytl_cevir($miktar)
{
    $baglanti = implode('',file('http://www.tcmb.gov.tr/kurlar/today.html'));
    preg_match('#ABD DOLARI[[:space:]]+([0-9\.]+)[[:space:]]+([0-9\.]+)#',$baglanti,$dolar);
    $alis  = $dolar[1];
    $satis = $dolar[2];
    $ytl = ($miktar * $alis);
    return $ytl;
}
echo ytl_cevir(100);
?>