¡¡¡Hola!!!
Estoy tratando de usar la función quitaacentos() en una página de envío de formulario y me da error.
La página que envía el form
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Documento sin título</title>
<script language="javascript">
function quitaacentos(t){
á="a";é="e";í="i";ó="o";ú="u";
acentos=//g;
return t.replace(acentos,
function($1){
return eval($1)
}
);
}</script>
</head>
<form action="envio.asp" method="post">
Contenido del mensaje:
<input name="ibody" type="text" value="" />
<label>
<input type="submit" name="button" id="button" ...
-
- Publicidad
Fecha actual 2026-03-19 02:19 @138
News of Foro - Perl en Español
Site map of Foro - Perl en Español » Foro : Foro - Perl en Español
La comunidad de programadores en Perl de habla-hispana.Duda con función JavaScript para eliminar acentos
Read more : Duda con función JavaScript para eliminar acentos | Vistas : 7546 | Respuestas : 2 | Foro : JavaScript
Variables argumentativas
Hola a todos :D
Me surgió la duda de las variables argumentativas, lo que yo quiero hacer es un script que trabaje por consola, o sea hacer algo como esto:
Y que me compare el argumento "-n".
Estoy pensando en usar algo como esto, claro que está mal usado, aun no lo sé implementar:
#!/usr/bin/perl
if ($ARGV == "-n") {
print "Normal. \n";
} ...
Me surgió la duda de las variables argumentativas, lo que yo quiero hacer es un script que trabaje por consola, o sea hacer algo como esto:
- Code: Seleccionar todo
C:\Perl>Code.pl -n
Y que me compare el argumento "-n".
Estoy pensando en usar algo como esto, claro que está mal usado, aun no lo sé implementar:
#!/usr/bin/perl
if ($ARGV == "-n") {
print "Normal. \n";
} ...
Read more : Variables argumentativas | Vistas : 1395 | Respuestas : 6 | Foro : Básico
El gobierno chino fotografía a los internautas en cibercafés
El gobierno chino ha comenzado a implementar una controvertida medida para mantener a sus ciudadanos alejados del contenido nocivo de la red: fotografiarlos al ingresar a cibercafés.
Hasta mediados de diciembre, todos los cibercafés de Beijing deberán contar con un equipo para fotografiar a sus clientes y escanear sus documentos de identidad.
14 distritos y condados de Beijing y 1.500 cibercafés ya cuentan con este equipo, llamado “Equipo Registrador de Clientes de Cibercafés de ...
Hasta mediados de diciembre, todos los cibercafés de Beijing deberán contar con un equipo para fotografiar a sus clientes y escanear sus documentos de identidad.
14 distritos y condados de Beijing y 1.500 cibercafés ya cuentan con este equipo, llamado “Equipo Registrador de Clientes de Cibercafés de ...
Read more : El gobierno chino fotografía a los internautas en cibercafés | Vistas : 2342 | Respuestas : 0 | Foro : Pasando el rato
Problemas concatenando
¡Buenas gente! Estoy intentando concatenar dos variables utilizando el operador punto (.). Es curioso porque he estado haciendo pruebas simples y ha funcionado perfectamente (pongo el miniejemplo):
my $rtb="02";
my $bsc="CAT01B2";
print"$bsc\n";
$bsc=$bsc._.RTB.$rtb;
print"$bsc\n";
Pero cuando lo pego a la rutina principal (sin hacer cambio alguno), me aparece el siguiente error:
Bareword "_" not allowed while "strict subs" in use at Aplicacio_v6.pl line 188.
Bareword "RTB" not allowed while "strict subs" in use at Aplicacio_v6.pl ...
my $rtb="02";
my $bsc="CAT01B2";
print"$bsc\n";
$bsc=$bsc._.RTB.$rtb;
print"$bsc\n";
Pero cuando lo pego a la rutina principal (sin hacer cambio alguno), me aparece el siguiente error:
Bareword "_" not allowed while "strict subs" in use at Aplicacio_v6.pl line 188.
Bareword "RTB" not allowed while "strict subs" in use at Aplicacio_v6.pl ...
Read more : Problemas concatenando | Vistas : 1178 | Respuestas : 5 | Foro : Básico
Cómo se hace el siguiente formulario
¿Alguien me podría decir qué tengo que hacer para realizar el siguiente formulario? Es un cuantificador de materiales. Está en la siguiente dirección:
http://mx.geocities.com/javiervg27/cotizador.html
Desde luego, como no sé cómo se hace, está inhabilitado. :shock:
http://mx.geocities.com/javiervg27/cotizador.html
Desde luego, como no sé cómo se hace, está inhabilitado. :shock:
Read more : Cómo se hace el siguiente formulario | Vistas : 997 | Respuestas : 3 | Foro : Básico
Colores en print
Estimados,
Los molesto para consultarles si alguien tiene un ejemplo donde pueda ver cómo poner colores en consola en los parámetros del print().
Por ej., me gustaría lo siguiente:
print "planta";
Donde la palabra planta este en color verde.
Gracias.
Los molesto para consultarles si alguien tiene un ejemplo donde pueda ver cómo poner colores en consola en los parámetros del print().
Por ej., me gustaría lo siguiente:
print "planta";
Donde la palabra planta este en color verde.
Gracias.
Read more : Colores en print | Vistas : 1441 | Respuestas : 6 | Foro : Básico
Intervalo de fechas
Buenas. Estaba haciendo unas consultas en SQL y me trabé con una y no sé cómo hacerla. ¡¡Capaz que no es difícil pero no sé me ocurrió cómo hacerla!!
Lo que tengo que hacer es que me devuelva algo así...
FROM `usuario`
Las fechas es desde el 2008-06-01 (no se le pasa la ...
Lo que tengo que hacer es que me devuelva algo así...
- Code: Seleccionar todo
Número de semana / Bajas / Altas
1 xx xx
2 xx xx
3 xx xx
4 xx xx
5 xx xx
FROM `usuario`
Las fechas es desde el 2008-06-01 (no se le pasa la ...
Read more : Intervalo de fechas | Vistas : 5665 | Respuestas : 13 | Foro : Bases de datos
Conversion números científicos en decimales
Hola.
Soy bastante novato en este lenguaje, y os estaría muy agradecido si pudieseis echarme una mano en estos dos problemas que tengo...
1. Necesito convertir un número científico en un entero sin decimales. No sé si existe alguna función para ello.
Los números son del siguiente formato: 1.0030506e+002 y necesito que quede así: 100.30506. ¿Cómo puedo hacerlo?
2. Una vez convertido en decimal, necesito eliminar los decimales y dejarlo de esta manera: 100.
Quizá ...
Soy bastante novato en este lenguaje, y os estaría muy agradecido si pudieseis echarme una mano en estos dos problemas que tengo...
1. Necesito convertir un número científico en un entero sin decimales. No sé si existe alguna función para ello.
Los números son del siguiente formato: 1.0030506e+002 y necesito que quede así: 100.30506. ¿Cómo puedo hacerlo?
2. Una vez convertido en decimal, necesito eliminar los decimales y dejarlo de esta manera: 100.
Quizá ...
Read more : Conversion números científicos en decimales | Vistas : 1564 | Respuestas : 2 | Foro : Básico
Undefined subroutine &main::???
Tengo este mensaje:
Mi módulo es FILE::kreader;
Cuando mi módulo lo llamo así:
#!/usr/bin/perl -w
use CGI::Carp qw(fatalsToBrowser);
use CGI qw(:all);
use lib('../modulos');
print header;
#use CGI::Session;
use HTML::Template;
use Data::Dumper;
use HTML::CalendarMonth;
use FILE::kreader;
Y dentro de mi módulo tengo esto:
package FILE::kreader;
use strict;
require Exporter;
{ no strict;
@ISA = qw(Exporter);
@EXPORT_OK = qw(makefile swrite cfind fwrite fedit fkread kread);
} ...
- Code: Seleccionar todo
Software error:
Undefined subroutine &main::fkread called at E:\O'Telch\Sitios web\bitacora\riocauca\panel.pl line 49.
Mi módulo es FILE::kreader;
Cuando mi módulo lo llamo así:
#!/usr/bin/perl -w
use CGI::Carp qw(fatalsToBrowser);
use CGI qw(:all);
use lib('../modulos');
print header;
#use CGI::Session;
use HTML::Template;
use Data::Dumper;
use HTML::CalendarMonth;
use FILE::kreader;
Y dentro de mi módulo tengo esto:
package FILE::kreader;
use strict;
require Exporter;
{ no strict;
@ISA = qw(Exporter);
@EXPORT_OK = qw(makefile swrite cfind fwrite fedit fkread kread);
} ...
Read more : Undefined subroutine &main::??? | Vistas : 5702 | Respuestas : 13 | Foro : Módulos
Cómo unir dos array en un hash
Me gustaría saber la forma óptima de unir dos array y que me queden en un hash, es decir, los datos del primer array serán las llaves y los del segundo las claves...
@array1 =('nombre', 'edad', 'pais');
@array2 =('fernado', '17', 'peru');
%hash {
'nombre' => 'fernado',
'edad' => '17',
'pais' => 'peru'
}
El problema es que nunca sabré cuáles y cuántos son los campos que traerá cada array, lo único que sé ...
@array1 =('nombre', 'edad', 'pais');
@array2 =('fernado', '17', 'peru');
%hash {
'nombre' => 'fernado',
'edad' => '17',
'pais' => 'peru'
}
El problema es que nunca sabré cuáles y cuántos son los campos que traerá cada array, lo único que sé ...
Read more : Cómo unir dos array en un hash | Vistas : 4662 | Respuestas : 8 | Foro : Avanzado
Last 10 active topics
Estadísticas
Mensajes totales 36895 • Temas totales 7436 • Usuarios totales 1983