Ver Tema

luisjf · 2011-06-15 15:00 @667

Hola, buenas tardes,

Mi caso es el siguiente: mi sistema consta de dos pantallas; una en la cual, a través de un formulario recopilo información para procesarla, y luego en la segunda se muestra un reporte.

En la primera pantalla estoy recogiendo la data de mi base de datos en MySQL con la ayuda del módulo DBI y la guardo en una variable. El problema está en que cuando el sistema va a mi pantalla de salida, el mismo requiere imprimir por pantalla una de las variables tomadas (por un select) en la primera pantalla y comúnmente esta variable está compuesta por más de una palabra (por ejemplo: "Ciudad capital").

El problema se presenta porque cuando imprimo por pantalla, solamente se muestra la primera frase (en nuestro ejemplo: "Ciudad") y no consigo el porqué de esta situación.

La recolección e impresión de dicha variable, de forma "muy reducida", la hago a través de:

Syntax: [ Download ] [ Hide ]

Using perl Syntax Highlighting

my $var = $form->param("namedelselect");
print "$var";
 

Cualquier información con la que me puedan dar luces la sabré agradecer.

Nota: cabe resaltar que la misma información que extraigo de la base de datos y muestro en el select para que el usuario escoja la opción sí es completa. Solo en la impresión luego del "$form->param..." es que se corta dicha frase.

kidd · 2011-06-15 15:17 @678

El problema puede estar en varios lugares, así que se necesitarían varios detalles más para poder identificar el problema.

* ¿Se está guardando la variable correctamente en tu base de datos?
* Si se está guardando correctamente, entonces ¿podrías mostrar el código con que haces el output?

luisjf · 2011-06-15 16:03 @711

Bueno voy a sintetizar la información intentando dar la mayoría de detalles:

De la siguiente forma recupero la data de mi BD, y con esa data creo un Select:

Syntax: [ Download ] [ Hide ]

Using perl Syntax Highlighting

#!/usr/bin/perl
use CGI;
use DBI;
$dbh = DBI->connect(
    "DBI:mysql:db",
    "xxxx",
    'xxxx',
    { mysql_enable_utf8 => 1 }
    );
print "Content-Type: text/html\n\n";
print<<HTML;
<html>
<head>HEAD</head>
<body>
<form name="operar" method="post" action="/cgi-bin/salida.pl">
<select name="name">
HTML
$sth = $dbh->prepare("select name from tabla");
$sth->execute;
while(($name,$valid_id)=$sth->fetchrow())
    {
    print"<option value=$name>$name</option>"
    }
print<<HTML2;             
<input name="igual" value="Buscar" type="submit">
</form>
</body>
</html>
HTML2
 

ignorando todo el manejo del resto de la data (que he omitido). Me interesa que en la "salida.pl" el sistema muestre entre otras cosas la opción que seleccionó el usuario. El código que tengo para esa impresión es el siguiente:

Syntax: [ Download ] [ Hide ]

Using perl Syntax Highlighting

#!/usr/bin/perl
use CGI;
#print"Content-type: text/html\n\n";
my $form = new CGI;
my $name = $form->param("name");
print $form->header;
print "<html>\n<head>\n";
print "</head>";
print "<body><p>La opción es $name</body>";
print "</html>";
exit;
 

es en la impresión de esa variable donde solo muestra la primera palabra de esa opción porque en la primera pantalla, en el select, sí muestra la frase completa.

kidd · 2011-06-15 16:34 @732

El problema está en el html saliente. Debes de cambiar la siguiente línea:

Syntax: [ Download ] [ Hide ]

Using perl Syntax Highlighting

print"<option value=$name>$name</option>"

por

Syntax: [ Download ] [ Hide ]

Using perl Syntax Highlighting

print"<option value=\"$name\">$name</option>"

El problema es que como tienes ahora el html resultante te da el siguiente valor:

Syntax: [ Download ] [ Hide ]

Using html4strict Syntax Highlighting

<option value=Ciudad capital>Ciudad capital</option>

Debido al espacio, 'capital' es tomado como un atributo html. Al hacer el cambio vamos a tener de forma correcta:

Syntax: [ Download ] [ Hide ]

Using html4strict Syntax Highlighting

<option value="Ciudad capital">Ciudad capital</option>

luisjf · 2011-06-16 08:35 @399

He probado la opción que me da kidd y ¡funcionó perfectamente! ¡muchas gracias, compañero! ¡Tenía tiempo sin estar en un foro tan activo y útil! ¡Muchas gracias!

Publicidad

Socializa