• Publicidad

Usar AdSense de Google con Perl

¿Ya sabes lo que es una referencia? Has progresado, el nível básico es cosa del pasado y ahora estás listo para el siguiente nivel.

Usar AdSense de Google con Perl

Notapor mydaboin » 2006-02-02 19:04 @836

Hola como estan???

espero que bien, a ver si me ayudan con este pequeño problema.

necesito incluir una publicidad de google, la cual me da el siguiente codigo automatico:

<script type="text/javascript"><!--
google_ad_client = "pub-08559655624545";
google_ad_width = 468;
google_ad_height = 60;
google_ad_format = "468x60_as";
google_ad_type = "text_image";
google_ad_channel ="";
google_page_url = document.location;
google_color_border = ["FDFFCA","CCCCCC"];
google_color_bg = ["FDFFCA","FFFFFF"];
google_color_link = ["0000CC","000000"];
google_color_url = ["008000","666666"];
google_color_text = ["000000","333333"];
//--></script>
<script type="text/javascript"
src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script>

como haría para adaptar este codigo a un .pl, hice un intento fallido el cual no mostro error pero no mostro la información ... mmm. .. respuestas??? .. sugerencias???
MYRD
mydaboin
Perlero nuevo
Perlero nuevo
 
Mensajes: 66
Registrado: 2004-04-22 08:07 @380
Ubicación: Pues Aqui, Preguntando

Publicidad

Re: Usar AdSense de Google con Perl

Notapor explorer » 2006-02-03 07:28 @352

Esto no es más que un trozo de código Javascript que debes meter dentro del código html de tu página web.
Si la página web la generas a través de un programa perl, tal cual le debe llegar al cliente, que es al final el que hace la petición a Google para que muestre los anuncios.
Debes comprobar que la salida del programa perl es una página html correcta. Lo puedes comprobar guardando la salida a un fichero externo, por ejemplo, prueba.html, y luego pruebas a leerlo desde tu navegador, a ver qué sale.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14476
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Notapor kidd » 2006-02-03 10:05 @462

Hola:

Tiene razón explorer, básicamente deberías tener algo así:

Código: Seleccionar todo
print "Content-type: text/html\n\n";

print qq~
<script type="text/javascript"><!--
google_ad_client = "pub-08559655624545";
google_ad_width = 468;
google_ad_height = 60;
google_ad_format = "468x60_as";
google_ad_type = "text_image";
google_ad_channel ="";
google_page_url = document.location;
google_color_border = ["FDFFCA","CCCCCC"];
google_color_bg = ["FDFFCA","FFFFFF"];
google_color_link = ["0000CC","000000"];
google_color_url = ["008000","666666"];
google_color_text = ["000000","333333"];
//--></script>
<script type="text/javascript"
src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script>
~;



SALUDOS
Uriel Lizama Perl programmer fundador de Perl en Español
Perl Programming Language
Avatar de Usuario
kidd
Creador de Perl en Español
Creador de Perl en Español
 
Mensajes: 1166
Registrado: 2003-10-15 16:52 @744
Ubicación: México

Notapor mydaboin » 2006-02-04 09:50 @451

kidd escribiste:Hola:

Tiene razón explorer, básicamente deberías tener algo así:

Código: Seleccionar todo
print "Content-type: text/html\n\n";

print qq~
<script type="text/javascript"><!--
google_ad_client = "pub-08559655624545";
google_ad_width = 468;
google_ad_height = 60;
google_ad_format = "468x60_as";
google_ad_type = "text_image";
google_ad_channel ="";
google_page_url = document.location;
google_color_border = ["FDFFCA","CCCCCC"];
google_color_bg = ["FDFFCA","FFFFFF"];
google_color_link = ["0000CC","000000"];
google_color_url = ["008000","666666"];
google_color_text = ["000000","333333"];
//--></script>
<script type="text/javascript"
src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script>
~;



SALUDOS


si es cierto, ya se hizo en HTML, pero no se quiere insertar en un top o un lateral, sino al final de presisamente un .pl, me explico, nosotros tenemos una seccion de noticias, donde se encuentran los titulos de las noticias es en perl, www.800guia.com/800tips se requiere que justo al final de esta hoja, se vea la dichosa publicidad de google, cuando se introduce dentro del área de html, encasilla el área de noticias, viendose como un cajon, y no se desea este efecto, sino que que justo al final de todas las noticias, salga la dichosa propaganda de google, para ello debo incluirla en mi scrip justo despues de mostrar todos los titulos de las noticias, la llamo por ejemplo:

&google;

en esta área, debería aplicar la propaganda que me fue dado para HTML, pero adaptado a perl, consegui una forma pero no funciona, otra seria llamar una imagen cualquiera y posecionar el archivo html sobre esta, comúnmente se hace así, ya que sobre el top se muestra la propaganda en las paginas echas en html o en PHP, ahora se puede o no mostrar esa publicidad adaptada a perl????.


Por lo que veo debere empaparme en dreamweaver, para hacer las plantillas y ver si así no tendre tantos problemas para mostrar esta publicidad, de todas formas les agradecería de antemano en lo que me puedan ayudar, gracias.
MYRD
mydaboin
Perlero nuevo
Perlero nuevo
 
Mensajes: 66
Registrado: 2004-04-22 08:07 @380
Ubicación: Pues Aqui, Preguntando

Notapor g013m » 2006-02-04 10:59 @499

Puedes crear plantillas HTML y separarlas de tu código Perl, creo que esa es la manera más efectiva de crear páginas o aplicaciones web, esto lo puedes hacer usando algunos módulos como HTML::Template, Template Toolkit, en la página hay un pequeño Tutorial de HTML::Template.
Lo que harías es crear la plantilla HTML en un lado y todo lo que vayas a hacer en Perl en otro y listo, no te enredas tanto con eso ;)

Saludos.
Resistirse es inútil, al final todos serán asimilados.
http://g013m.unplug.org.ve
g013m
Perlero nuevo
Perlero nuevo
 
Mensajes: 15
Registrado: 2005-07-15 23:11 @007

Re: Usar AdSense de Google con Perl

Notapor explorer » 2006-02-04 11:03 @502

mydaboin escribiste:para ello debo incluirla en mi scrip justo despues de mostrar todos los titulos de las noticias, la llamo por ejemplo:

&google;

en esta área, debería aplicar la propaganda que me fue dado para HTML, pero adaptado a perl.

Por lo que veo debere empaparme en dreamweaver, para hacer las plantillas y ver si así no tendre tantos problemas para mostrar esta publicidad, de todas formas les agradecería de antemano en lo que me puedan ayudar, gracias.

Yo veo que la parte de noticias no es más que una tabla. Si la propaganda quieres que vaya al final, primero métela dentro de un campo div con alineamiento centrado después de la tabla, y dentro de él, el código que te ha pasado Google. Eso lo puedes hacer de forma muy sencilla en el código Perl con sólo pintar la parte de Google después de haber hecho la tabla.
Veo que tienes puesto que ha de ser un banner gráfico de 468x60 puntos. Como no sabemos cómo será ese gráfico, lo que más puede desentonar son los colores del banner con los colores de fondo de la página (blanco). Pero ahí no puedes influir...
¿No puedes decirnos más claramente el error que te da? ¿O es que no sale nada directamente? En ese caso necesitaríamos ver algo de código para ver qué es lo que haces.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14476
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Notapor kidd » 2006-02-04 12:00 @542

Hola:

En ese caso es sumamente sencillo, por ejemplo:

Código: Seleccionar todo
#Creamos la función google
sub google{

print qq~
<script type="text/javascript"><!--
google_ad_client = "pub-08559655624545";
google_ad_width = 468;
google_ad_height = 60;
google_ad_format = "468x60_as";
google_ad_type = "text_image";
google_ad_channel ="";
google_page_url = document.location;
google_color_border = ["FDFFCA","CCCCCC"];
google_color_bg = ["FDFFCA","FFFFFF"];
google_color_link = ["0000CC","000000"];
google_color_url = ["008000","666666"];
google_color_text = ["000000","333333"];
//--></script>

<p>

<table>
<td>
<script type="text/javascript"
src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script>
</td>
</table>
~;

}



Entonces en tu script, ya cuando hayas terminado todas las funciones para imprimir tu noticia puedes poner:

Código: Seleccionar todo
google();



SALUDOS
Uriel Lizama Perl programmer fundador de Perl en Español
Perl Programming Language
Avatar de Usuario
kidd
Creador de Perl en Español
Creador de Perl en Español
 
Mensajes: 1166
Registrado: 2003-10-15 16:52 @744
Ubicación: México

Notapor mydaboin » 2006-02-06 09:50 @451

Muchas, muchassss gracias a todos, Kidd esta perfecto ahora ... :D
MYRD
mydaboin
Perlero nuevo
Perlero nuevo
 
Mensajes: 66
Registrado: 2004-04-22 08:07 @380
Ubicación: Pues Aqui, Preguntando


Volver a Intermedio

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados