Ver Tema

JP_Cba · 2008-09-16 12:04 @545

Hola gente no puedo encontrar la forma de agregar un favicon a mi pagina en el objeto cgi, intente de varias formas pero ninguna funciono. Lo que se que lo tengo que meter en la parte del start_html. Dejo el codigo para ver si alguien me puede ayudar. Muchas gracias.Saludos

Syntax: [ Download ] [ Hide ]

Using perl Syntax Highlighting

$CgiObj->start_html(-title=>'Titulo',-style=>{-src=>'styles.css'},-script=>{-language=>'javascript',src=>'script.js'}, -head=>Link({rel=>"shortcut icon", href=>'favicon.ico"'})),

 -head=>Link({rel=>"shortcut icon", href=>'favicon.ico"'}

Esta seria la parte que agrega el link con el favicon

explorer · 2008-09-16 12:47 @574

Bienvenido a los foros de Perl en Español, JP_Cba.

¿No sobran unas comillas dobles después de favicon.ico?

JP_Cba · 2008-09-16 12:59 @583

Muchas gracias por tu respuesta. Tenés razón en ese error, yo copié mal acá el código (disculpas), pero la cuestión es que sigue funcionando mal. Me da Internal Server Error (500). Aclaro, que sí veo el favicon, pero da el error.

Syntax: [ Download ] [ Hide ]

Using perl Syntax Highlighting

print $CgiObj->header(),

$CgiObj->start_html(

    -head   => Link({

                 rel  => 'shortcut icon',

                 href => 'favicon.ico',

               }),

    -title  => 'titulo',

    -style  => {

                 -src => 'styles.css'

               },

    -script => {

                 -language => 'javascript',

                 src       => 'script.js'

               }

),

explorer · 2008-09-16 13:17 @595

Prueba con esto:

Syntax: [ Download ] [ Hide ]

Using perl Syntax Highlighting

#!/usr/bin/perl

use CGI;

my $CgiObj = CGI->new();

print

    $CgiObj->header(),

    $CgiObj->start_html(

        -head   => $CgiObj->Link({

                     -rel      => 'shortcut icon',

                     -href     => '/favicon.ico',

                   }),

        -title  => 'titulo',

        -style  => {

                     -src      => 'styles.css',

                   },

        -script => {

                     -language => 'javascript',

                     -src      => 'script.js',

                   },

    ),

    $CgiObj->end_html()

;

Cambios:
* He agregado '-' en todas las claves
* He agregado '$CgiObj->' a Link()
* He puesto una '/' delante de favicon.ico, para indicar que está al principio del sitio web, pero yo pondría todo un URL (http://...)

Mira a ver el código que genera. A mi me sale:

Syntax: [ Download ] [ Hide ]

Content-Type: text/html; charset=ISO-8859-1
<!DOCTYPE html
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en-US" xml:lang="en-US">
<head>
<title>titulo</title>
<link rel="shortcut icon" href="/favicon.ico" />
<link rel="stylesheet" type="text/css" href="styles.css" />
<script src="script.js" type="text/javascript"></script>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
</head>
<body>
</body>

JP_Cba · 2008-09-16 13:29 @603

Funcionó correctamente, te agradezco. Muy bueno el foro. Saludos.

Publicidad

Socializa