 Dom May 29, 2005 3:46 pm
|
|
|
| resetear parametros |
 |
|
Estoy trabajando con el modulo cgi, el pl recibe unos parametros:
$q->new CGI;
my $variable1= $q->param(parametro1);
my $variable2 = $q->param(parametro2);
Hasta aqui todo marcha bien, mi problema es que luego de realizar unas operaciones como alta o bajas , quiero inicializar en vacio o blanco "" los parametros "NO TODOS" , SOLO algunos, y no me funciona lo siguiente.
$q->delete('variable1', 'variable2');
Me podrian indicar como hacerlo. Muchas gracias.  |
|
|
|
|
Dom May 29, 2005 4:06 pm
|
 |
kidd
Creador de Perl en Español
|
Registrado: 15 Oct 2003
Mensajes: 1389
Ubicación: México
|
|
|
|
|
Hola:
Podrías más bien recibir todos los valores y ponerlos en un hash, para después poder ir quitando las llaves que ya no necesitas. Aquí te pongo un ejemplo para que comprendas:
| Código: |
#!/usr/bin/perl -w
use strict;
use CGI;
my $query = new CGI;
#Recibe todos los valores y los pone en el hash %Input
#La llave es el nombre de la variable
#y el valor, pues el valor de la variable
my %Input = $query->Vars;
#Digamos que se mandaron dos variables al CGI
# Nombre y Email
#Imprimimos las variables
print "$Input{'Nombre'}\n";
print "$Input{'Email'}\n";
#Ahora no las necesitamos
delete($Input{'Nombre'});
delete($Input{'Email'});
#Probemos si realmente se eliminaron las variables
print "$Input{'Nombre'}\n"; #-> No imprime nada
|
SALUDOS |
|
Powered by phpBB © 2001, 2005 phpBB Group
|
