Foro - Perl en Español

Sí que hay un ejemplo, más o menos parecido, en la página de manual de CGI::FormBuilder. En número 4 recupera la información de un usuario y crea un formulario con esos datos.

Yo no lo he probado, pero sería recuperar la información de la base de datos, metiéndola en un hash (o quizás un array... o un array de hash.... no lo tengo claro), para luego pasarlo al new() del módulo, en la opción 'options' o 'values' (tampoco lo tengo claro).

A ver si alguien más sabe de este asunto.

Mirando con más detalle el módulo, me parece que deberás usar una plantilla para poder presentar los datos en forma de tabla...

A ver... no conozco FormBuilder también como para darte un buen consejo, pero sí una reflexión: lo que el servidor web está esperando es el HTML que hay que enviar el navegador del usuario. Y si estás en CGI::Application, eso corresponde con lo que debe retornar la subrutina que se ejecuta como runmode, en la última instrucción, generalmente con un return().

Entonces, la solución es pensar que, en lugar de enviar hacia la salida estándar (print) la página creada con FormBuilder, la guardamos en un escalar y eso es lo que devolvemos en el return() del runmode.

He encontrado un hilo de discusión en PerlMonks.org, de hace justamente cuatro años, que plantea los mismos problemas: Problem With CGI::Application and FormBuilder.

Ahí verás (en el segundo código), cómo el programador, en la subrutina login(), devuelve el formulario en caso de que el usuario no haya ingresado correctamente:
return $form->render;

noa86 escribiste:Lo he solucionado introduciendo

Sintáxis: [ Descargar ] [ Ocultar ]

Sintáxis: [ Descargar ] [ Mostrar ]

Using perl Syntax Highlighting

1. keepextras=>[qw(mode)]

Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4

una de las opciones que tiene FormBuilder.

Eso es... en el código que te he enlazado, verás que hay unas líneas así:
que ayudan a CGI::Application a guardar el modo de ejecución.

noa86 escribiste:Mi duda ahora es. Introduzco un nombre de un usuario:

Sintáxis: [ Descargar ] [ Ocultar ]

Sintáxis: [ Descargar ] [ Mostrar ]

Using perl Syntax Highlighting

1. $form->field(name => 'usuario', label  => 'Nombre de usuario',  size => 30,jsmessage  => " * Nombre de usuario no es el correcto");

Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4

Pero lo quiero validar de tal manera que me diga si existe otro usuario con el mismo nombre en la base de datos.

¿Sería en un nuevo sub, ya que estoy en cgi-app. Llamándome en

Sintáxis: [ Descargar ] [ Ocultar ]

Sintáxis: [ Descargar ] [ Mostrar ]

Using perl Syntax Highlighting

1.  validate=>/&comprobar

Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4

y que el sub comprobar devuelva true o false? No sé muy bien si eso que estoy diciendo es correcto...

Viendo el código que te enlacé, el proceso es: el control lo recibe CGI::Application, ya que la aplicación está basada en ella. Luego, dentro de un runmode (en el código, 'login'), es donde comprueba si el nombre de usuario y contraseña están bien, y si no, muestra el formulario creado con FormBuilder.

En caso de que el usuario sea correcto, el programador crea una nueva sesión, guardando en ella el parámetro 'logged-in' igual a 1. Crea una nueva página, con un nuevo runmode, donde se le da la bienvenida al usuario. En el resto de runmodes, se comprueba el valor de 'logged-in' para comprobar si el usuario de esa sesión está validado o no, y actuar en correspondencia.

En la página cgi-app.org, sí que aparece CGI::FormBuilder como módulo recomendado, pero de forma más "colateral": no hay ejemplos ni manuales. Y en el resto de Internet, tampoco encuentro ejemplos de C::A junto con C::F.

Los que sí recomiendan usar son los plugins:

• CGI::Application::Plugin::ValidateRM es un verificador de formularios, igual que FormBuilder, pero basado en el módulo Data::FormValidator (los dos, del mismo autor que C::A)
• CGI::Application::Plugin::FillInForm basado en HTML::FillInForm, que sirve para rellenar los formularios presentes en un HTML.

Es decir: la página se crea con una plantilla; con FillInForm la rellenamos a los valores anteriores o con los valores que queramos; y con ValidateRM comprobamos los valores que nos devuelve el usuario.