Foro - Perl en Español

por **danimera** » 2012-04-17 09:18 @429

Muy poco entiendo o no comprendo, hay una API que me dan un ejemplo para hacer una pregunta a un artículo de la página, pero no sé cómo lograrlo en Perl.

¿Cómo podría hacer esta petición en Perl al API?

Sintáxis: [ Descargar ] [ Ocultar ]

Using text Syntax Highlighting

curl -v -k -H "Content-Type: application/json" -X POST -d {

   item_id:"<itemID>",

   text:"Tenés de color rojo?"}

https://api.sitio.com/questions?access_token=APP_USR-242-041709-c6eba84d96fc5e38ff9b84d3adde7e01Coloreado en 0.000 segundos,  usando GeSHi 1.0.8.4

Ojalá con WWW::Mechanize...

my $uri  = 'https://api.sitio.com/questions?access_token=APP_USR-242-041709-c6eba84d96fc5e38ff9b84d3adde7e01';
my $json = '{item_id:"<itemID>",text:"Tenés de color rojo?"}';
 
my $req  = HTTP::Request->new( 'POST' => $uri );                 # petición POST
$req->content_type( 'application/json' );                        # tipo de contenido
$req->content( $json );                                          # contenido
 
my $lwp = LWP::UserAgent->new;                                   # creamos un agente
$lwp->request( $req );                                           # que hace la petición
 
Coloreado en 0.003 segundos,  usando GeSHi 1.0.8.4

Solo falta en el código la parte de recoger la respuesta.

Y si se puede hacer con LWP, también se debería poder hacer con WWW::Mechanize.

Foro - Perl en Español

Cómo usar una API en Perl con Curl

Cómo usar una API en Perl con Curl

Publicidad

Re: Cómo usar una API en Perl con Curl

¿Quién está conectado?