Ver Tema

Doddy · 2010-04-22 13:06 @587

Hola a todos.

Quiero hacer un formulario totalmente en CGI, o sea, que todo sea en un mismo archivo y no poner archivo HTML externos.

¿Alguien conoce alguna manera?

PD: también me gustaría saber dónde encuentro un manual para usar un CGI en vez de archivos externos html.

ficovh · 2010-04-22 14:38 @651

CGI.pm es tu amigo, http://perldoc.perl.org/CGI.html

Aunque en estos días, es mejor usar alguna sistema de plantillas como Template Toolkit, HTML-Template y usar Perl para pasar información a ellas.

Saludos.

explorer · 2010-04-22 15:24 @683

Mira la sinopsis del módulo CGI, donde hay un ejemplo de cómo crear información HTML a partir de funciones del módulo.

Para lo del formulario... enlazas el formulario desde otra página. Al principio del programa compruebas el valor de los parámetros que el usuario te haya pasado (con params(), por ejemplo). En la primera invocación, no habrá nada, así que sabrás que tienes que pintar el formulario vacío. Pero si hay parámetros, es que el usuario ha recargado la página o ha pulsado el botón de envío. Esto último también lo compruebas mirando el param() correspondiente, y actúas según el caso.

Mira mi CGI mínimo, donde puedes ver cómo se accede a los parámetros.

danimera · 2010-04-24 01:02 @085

Doddy escribió:

Hola a todos.

Quiero hacer un formulario totalmente en CGI, o sea, que todo sea en un mismo archivo y no poner archivo HTML externos.

¿Alguien conoce alguna manera?

PD: también me gustaría saber dónde encuentro un manual para usar un CGI en vez de archivos externos html.

Pues FormBuilder te ayuda con eso fácilmente. Ejemplo de formulario:

Syntax: [ Download ] [ Hide ]

Using perl Syntax Highlighting

#!/usr/bin/perl
 
use CGI::FormBuilder;
 
@fields = qw(first_name last_name email phone);
 
$form = CGI::FormBuilder->new(
             fields => \@fields,
        );
 
if ($form->submitted && $form->validate) {
    # you would write code here to act on the form data
    $fname = $form->field('first_name');
    $lname = $form->field('last_name');
 
    print $form->confirm(header => 1);
} else {
    print $form->render(header => 1);
}

Este te genera todo el HTML solo,
http://www.formbuilder.org/tutor/index.pl?c=1&s=2

marcmb · 2010-05-13 11:11 @507

¿Alguien sabe cómo hacer para que cuando apretemos el botón de mandar el formulario ejecute una función de Perl?
(usando CGI, no FormBuilder)
De momento lo he echo así y funciona, pero no se si es la mejor manera:

if (param('enviar')) #enviar es el nombre del botón de envio
{
#Comprobación de los campos rellenados;
}

Gracias de antemano.

Publicidad

Socializa