<?
/*
  Desenvolvida por Tib�rio Ferreira Lima Brasil
  MSN:    tiberio_brasil@hotmail.com
  EMAIL:  tiberiobrasil@gmail.com
  SITE:   http://www.tiberiobrasil.com.br/
  
  ====================
  Script Recorta HTML:
  ====================
    Retorna uma string HTML de uma p�gina qualquer
    
  ================
  Como utiliz�-la:
  ================
    Este script retorna o c�digo fonte de uma p�gina e
    utiliza a fun��o explode para recortar um peda�o do
    c�digo HTML desta p�gina.
    
  ============
  Por exemplo:
  ============
    
  - URL: http://www.urlqualquer.com.br/

  // Codigo Fonte
  <html><body>Nome de usu�rio: Tib�rio<br>N�mero: 10</body></html>

  - Para obtermos o nome do usu�rio, utilizamos:

  $pag = 'http://www.urlqualquer.com.br/';

  $st1 = '<html><body>Nome de usu�rio: ';
  $st2 = '<br>';
  $va1 = retorna_string($pag,$st1,$st2);
  // $va1 = 'Tib�rio';
  
  $st1 = '<br>N�mero: ';
  $st2 = '</body></html>';
  $va2 = retorna_string($pag,$st1,$st2);
  // $va2 = '10';
*/
  @set_time_limit(0);

  function retorna_codigo($url){
    $ini = @curl_init();
    if(!$ini){
      exit();
    }
    curl_setopt($ini, CURLOPT_URL, $url);
    curl_setopt($ini, CURLOPT_HEADER, 0);

    ob_start();

    curl_exec($ini);
    curl_close($ini);

    $var = ob_get_contents();

    ob_end_clean();

    return $var;
  }

  function retorna_string($var,$st1,$st2){
    $var = retorna_codigo($var);

    $res = explode($st1,$var);
    $res = explode($st2,$res[1]);

    $ar1 = array('<br>');
    $ar2 = array('');

    $res = str_replace($ar1, $ar2, $res[0]);

    return $res;
  }
  
  $pag = 'http://www.phpbrasil.com/';
  $st1 = '<span class="menuforum"><a href="/profile.php/user/lworks">';
  $st2 = '</a>';
  $va1 = retorna_string($pag,$st1,$st2);
  
  $st1 = 'Pontos: ';
  $st2 = '</span>';
  $va2 = retorna_string($pag,$st1,$st2);

  // Retornando um usu�rio do elenco da PHP Brasil e seus pontos
  echo '<pre>';
  echo '&nbsp;&raquo; Usu�rio: <b>'.$va1.'</b>';
  echo '<br>';
  echo '&nbsp;&raquo; Pontos:&nbsp; <b>'.$va2.'</b>';
  echo '<pre>';
?>