$ wget -p -q http://www.noelrocha.com
$ du -sh www.noelrocha.com
28k                             www.noelrocha.com

      'debug'    => true, // Debug ligado

<?php                                    
// Incluindo arquivo com a classe Mail   
require_once('Mail.php');                
 
if ($_SERVER['REQUEST_METHOD'] == 'POST') {
  // Nome de quem está indicando o site    
  $indicador_nome = $_POST['meu_nome'];    
 
  // Email de quem está indicando o site
  $indicador_email = $_POST['meu_email'];
 
  // Nome de quem receberá o email
  $nome =  $_POST['nome_do_amigo'];
 
  // Email que receberá o email
  $to = $_POST['email_do_amigo'];
 
  // Nome de quem está enviando
  $from = "$indicador_nome <$indicador_email>";
 
  // Assunto da mensagem
  $subject = 'Indicação de site';
 
  /*                             
   Corpo da mensagem             
   Em caso de formulário alterar para a variável $_POST['CAMPO']
  */                                                            
  $body =<<<EOM                                                 
Indicação de site de $indicador_nome!!!                         
EOM;                                                            
 
  // Servidor do Gmail                                          
  $host = "ssl://smtp.gmail.com";                               
 
  // Email do Gmail que fará o envio autenticado                
  $username = 'noel@noelrocha.com';                        
 
  // Sua senha do GMAIL                                         
  $password = 'SECRETA';                                        
 
  // Cabeçalho do email                                         
  $headers = array (                                            
    'From'     => $from,                                        
    'Reply-to' => $from,                                        
    'To'       => $to,                                          
    'Subject'  => $subject                                      
  );                                                            
 
  $smtp = Mail::factory('smtp',                                 
    array (                                                     
      'host'     => $host,                                      
      'port'     => 465, // SMTPS(para mais detalhes ver /etc/services
      'auth'     => true,                                             
      'debug'    => true, // Debug ligado                             
      'username' => $username,                                        
      'password' => $password                                         
    )                                                                 
  );                                                                  
 
  // Efetuando o envio autenticado                                    
  $mail = $smtp->send($to, $headers, $body);                          
 
  // Verificando se houve erro                                        
  if (PEAR::isError($mail)) {                                         
    echo("Error" . $mail->getMessage());
  } else {
    echo("Email enviado com sucesso!!");
  }
}
?>
  <form method="POST">
    Nome:<br/>
    <input type="txt" name="meu_nome"><br/>
    Email:<br/>
    <input type="txt" name="meu_email"><br/>
    Nome do seu amigo:<br/>
    <input type="txt" name="nome_do_amigo"><br/>
    Email do amigo:<br/>
    <input type="txt" name="email_do_amigo"><br/>
    <br/>
    <input type="submit">
  </form>

syntax on                      " Mostra código com sintaxe, ou seja, colorido.
set autoindent                 " Identa o texto automáticamente
set backup                     " Salva arquivos com extensão ~
set backupdir=~/Desktop/TMP/   " Salva o backup em uma partição do tipo tmpfs
set title                      " Adiciona o nome do arquivo na barra de título
set tabstop=2                  " Quantidade de espaços por tab \t
set history=1000               " Quantidade de comandos dado dentro do vim que ficaram no histórico
set ruler                      " Exibe a linha que o curso está
set ignorecase                 " Ignora letras maiúsculas e minúsculas nas buscas
set expandtab                  " Troca tabs por espaços
set shiftwidth=2               " 2 espaços após o começo da linha e da identação
set softtabstop=2              " Quando dá um tab ele troca por 2 espaços
set wrap                       " Força quebra de linha
set textwidth=80               " Quebra de linha em 80 caracteres
set incsearch                  " Mostra as palavras que batem com o que está digitando na busca