2010-08-05 8 views
5

El siguiente código PHP hace exactamente lo que quiero hacer. El problema es que necesito volver a crearlo en Perl y he estado jugando con las funciones Perl open() y sysopen() pero no puedo hacerlo. ¿Alguien tiene alguna ayuda o sabe de algún enlace que pueda ayudar? Gracias.equivalente en Perl de get_file_contents() de PHP

$URL = "http://example.com/api.php?arguments=values"; 
echo file_get_contents($URL); 
+0

Tener un lookt a: https://stackoverflow.com/questions/953707/in-perl-how-can-i-read- an-entire-file-into-a-string –

Respuesta

12

Puede hacer uso de LWP:

use LWP::Simple; 
$contents = get $URL or die; 
print $contents; 
+0

obviamente no necesita almacenar los contenidos. 'use LWP :: Simple; imprimir obtener "http://google.com" o morir; 'y el 'dado' es un failsafe-exit – vol7ron

+0

, por supuesto, también podría usar' getprint() ':' use LWP :: Simple; getprint ("http://www.google.com") o morir; ' – vol7ron

Cuestiones relacionadas