| Www :: google :: api :: base Perl Cliente a la API de Google Base |
Descargar ahora |
Www :: google :: api :: base Clasificación y resumen
- Licencia:
- Perl Artistic License
- Nombre del editor:
- John Cappiello
- Sitio web del editor:
- http://www.wikalong.org/
Www :: google :: api :: base Etiquetas
Www :: google :: api :: base Descripción
Perl cliente a la API de Google Base Www :: google :: API :: Base es un cliente Perl a la Base de Google API.SYNOPSIS Uso www :: Google :: API :: Base; My $ file_conf = LoadFile ($ env {home} '/ .. gapi'); My $ api_key = $ env {gapi_key}; My $ api_user = $ env {gapi_user}; My $ api_pass = $ env {gapi_pass}; My $ GBASE = www :: google :: API :: Base-> Nuevo (AUTH_TYPE => 'programmaticlogin', api_key => $ api_key, api_user => $ api_user, api_pass => $ api_pass}, {}); kitthessant $ insert_entry = $ gbase-> inserte ('http://www.google.com/base/feeds/itemtypes/en_us/recipes', {-title => '' pollo 'jingxian', -content => "Delectable Sichuan Specialty ", -Link => , cocinate_time => 30, etiqueta => , Main_ingredient => , porciones => 5,},); $ new_id = $ inserter_entry-> ID; Actualizar $ update_entry = $ gbase-> Actualizar ($ new_id, {-title => '' pollo jingxian ', -content => "especialidad de Sichuan de Delectable", -Link => , cocinate_time => 60, etiqueta => , main_ingredient = > , porciones => 15,},); Eliminar mi $ delete_response; eval {$ DELETE_RESPONSE = $ GBASE-> Eliminar ($ New_ID); }; if ($ @) {mis $ e = $ @; morir $ e-> status_line; # Http :: Respuesta} DIE "Borrado con éxito si $ Delete_Response-> Código == 200; # http :: ResponseSeSelectualmente admite la consulta por ID MY $ SELECT_INSERTED_Entry; eval {$ select_inserted_entry = $ gbase-> select ($ new_id);} ; Si ($ @) {My $ E = $ @; DIE $ E-> Status_Line; # http :: respuesta} Requisitos: · Perl
Www :: google :: api :: base Software relacionado