[Perl-unix-users] How to captures a web pages in a variable

[Ing. Ricardo Cumberbatch L. \(PANNet - URC\)]

Hi

How could i do example:

Server B execute a page from Server A and saved the information and
send it to Server C.

Server C couldn't know that the infomation came from Server A. I found
that in PHP is do in this way:
 
 function verificar_url($url)
 {
         //abrimos el archivo en lectura
         [EMAIL PROTECTED]($url,"r");
         //hacemos las comprobaciones
         if ($id) $abierto=1;
         else $abierto=0;
         //devolvemos el valor
         return $abierto;
         //cerramos el archivo
         fclose($id);
 }
 
 
 
 $url= "http://www.skytel.com.co";;
 
 
 $Resultado= verificar_url($url);
 
 echo " Resultado $Resultado ";
 if ($Resultado == 1)
   {
    echo " DIRECCION EXISTENTE ";
    // Aqui puede ingresar la rutina para traer la informacion del sitio
 web
   }
  else
   {
    echo " DIRECCION  NO   EXISTENTE o FUERA DE LINEA ";
 
 
   }
  la primera es la funciC, y la otra parte es  el uso de @ delante de fopen es para 
que en caso de
 error no se muestre en la pantalla
 

How could I do something like this or work like it.

Thank for the help

_______________________________________________
Perl-Unix-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs