• Publicidad

Webmin, Perl y radio botón

¿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.

Webmin, Perl y radio botón

Notapor legh_21 » 2010-03-09 15:27 @686

¡Que onda! Soy nuevo en el foro y tengo un problema que no me dormir jeje :lol:

Estoy haciendo un formulario en Perl para consultar subredes asignadas por un servidor de DHCP buscando los logs para un módulo de Webmin, y estoy tratando de tomar el valor que da un radio button sin un submit, o sea, que se mande ese valor cuando doy clic en un href; hasta ahora el href envía solo una variable que leo de un archivo, pero a la hora que quiero sacar el valor del radio button para mandarlo junto con el href; no sé cómo sacarlo, el código es:

radio button:

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
print "<tr> <td><b>$text{'index_semana'}</b></td>\n";

print "<td>", &ui_radio_selector([[ 1, $text{'index_semana1'}, undef ],
                                  [ 2, $text{'index_semana2'}, undef ],
                                  [ 3, $text{'index_semana3'}. undef ],
                                  [ 4, $text{'index_semana4'}, undef ] ], "rad", 2),"</td>\n";
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4


La línea que crea el href y envía los datos a save.cgi.

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
print "<a href=\"save.cgi?subred=$subnetcomplete&semana=$rad\"method=get>".&html_escape($subnetcomplete)."</a>";
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4


Muchas gracias, saludos.
legh_21
Perlero nuevo
Perlero nuevo
 
Mensajes: 5
Registrado: 2010-03-08 19:09 @840

Publicidad

Re: Webmin, Perl y radio botón

Notapor explorer » 2010-03-09 15:45 @698

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

Yo el único problema que veo es que no tengo la documentación de la función ui_radio_selector().

En la función radio_group() del módulo CGI sí que es posible indicar las etiquetas separadas de los valores:

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
print radio_group(
    -name       => 'grupo_botones',
    -values     => ['valor1','valor2','valor3'],
    -default    => 'valor3',
    -linebreak  => 'true',
    -labels     => \%etiquetas,
    -attributes => \%atributos,
);
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4


Luego, es posible recuperar qué radio botón se pulsó:

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
$que_radio_boton = param('grupo_botones');
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14486
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Re: Webmin, Perl y radio botón

Notapor legh_21 » 2010-03-09 16:33 @731

Gracias, lo probaré con esta función a ver si queda.

Saludos
legh_21
Perlero nuevo
Perlero nuevo
 
Mensajes: 5
Registrado: 2010-03-08 19:09 @840

Re: Webmin, Perl y radio botón

Notapor legh_21 » 2010-03-09 22:53 @995

¡Gracias, con esta función quedó de 10!

Saludos
legh_21
Perlero nuevo
Perlero nuevo
 
Mensajes: 5
Registrado: 2010-03-08 19:09 @840


Volver a Intermedio

¿Quién está conectado?

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

cron