Hola, ¿qué tal...?
Quisiera ver si me podrían ayudar con este problema que tengo...
Estoy haciendo un código en el cual tengo que contar un par de palabras que son "Pre y Post"... pero algo anda mal ya que me sí me imprime cuántas veces se encontraron dichas palabras pero tengo la duda de cómo separar mi archivo por el ">" que está al principio de cada línea para así hacerlo por segmentos...
Espero y ...
-
- Publicidad
Fecha actual 2025-03-16 19:10 @840
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.Contador de palabras por secuencia
Read more : Contador de palabras por secuencia | Vistas : 737 | Respuestas : 6 | Foro : Básico
Añadir más columnas a un archivo en Excel
¿Qué tal?
Estoy haciendo un script en Perl en donde estoy utilizando el módulo Spreadsheet::WriteExcel para generar un archivo en Excel. El problema que tengo es que necesito alrededor de 400 columnas y cuando genero el documento solamente llega a la columna IV (256 columnas).
¿Hay alguna manera de poder aperturar más columnas usando el módulo Spreadsheet::WriteExcel?
Muchas Gracias por su ayuda.
Estoy haciendo un script en Perl en donde estoy utilizando el módulo Spreadsheet::WriteExcel para generar un archivo en Excel. El problema que tengo es que necesito alrededor de 400 columnas y cuando genero el documento solamente llega a la columna IV (256 columnas).
¿Hay alguna manera de poder aperturar más columnas usando el módulo Spreadsheet::WriteExcel?
Muchas Gracias por su ayuda.
Read more : Añadir más columnas a un archivo en Excel | Vistas : 1575 | Respuestas : 3 | Foro : Intermedio
Manipulación de categorías
Lo que quiero es ahorrar programar un código para buscar un artículo dada una categoría padre y que busque de ahí en todas las subcategorías hasta N nivel...
También si es posible que me retorne el árbol de categorías y subcategorías...
Verán: ya hice una función recursiva pero me pareció poco óptima... Encontré éste, pero no me agrada mucho.
http://search.cpan.org/~jlishev/WebTool ... egories.pm
También si es posible que me retorne el árbol de categorías y subcategorías...
Verán: ya hice una función recursiva pero me pareció poco óptima... Encontré éste, pero no me agrada mucho.
http://search.cpan.org/~jlishev/WebTool ... egories.pm
Read more : Manipulación de categorías | Vistas : 835 | Respuestas : 0 | Foro : Módulos
Duda con bucles
Hola, buenas. Soy nuevo en Perl y poco a poco voy haciendo cosillas, pero aquí os pongo un par de dudas.
$busqueda=~ m/<b>(.*)<\/b><\/font><\/a><span class="mstrucos"><\/span> /;
En $busqueda tengo guardado un fichero de texto línea a línea. Contiene el código HTML del resultado de una búsqueda.
Con esta primera línea, guardo el nombre del primer cliente en $1, pero en $2, no me guarda la segunda coincidencia. ¿¿¿ Cómo podría coger las demás coincidencias ???
while ...
$busqueda=~ m/<b>(.*)<\/b><\/font><\/a><span class="mstrucos"><\/span> /;
En $busqueda tengo guardado un fichero de texto línea a línea. Contiene el código HTML del resultado de una búsqueda.
Con esta primera línea, guardo el nombre del primer cliente en $1, pero en $2, no me guarda la segunda coincidencia. ¿¿¿ Cómo podría coger las demás coincidencias ???
while ...
Read more : Duda con bucles | Vistas : 499 | Respuestas : 3 | Foro : Básico
Usar OppenSSL desde Perl
Disculpas, pero llevo días en tratar de resolver esto, y no avanzo.
Mi objetivo es firmar un archivo digitalmente. Tengo un archivo de clave (privatekey) y un archivo de certficado (cert).
Desde una aplicación Perl quiero hacer uso del OpenSSL de Linux. Tengo un código en Phyton que lo hace y no sé cómo hacerlo en Perl.
# Firmar el texto (tra), donde cert y privatekey son datos conocidos
out = Popen(["openssl", "smime", "-sign","-signer", cert, ...
Mi objetivo es firmar un archivo digitalmente. Tengo un archivo de clave (privatekey) y un archivo de certficado (cert).
Desde una aplicación Perl quiero hacer uso del OpenSSL de Linux. Tengo un código en Phyton que lo hace y no sé cómo hacerlo en Perl.
# Firmar el texto (tra), donde cert y privatekey son datos conocidos
out = Popen(["openssl", "smime", "-sign","-signer", cert, ...
Read more : Usar OppenSSL desde Perl | Vistas : 3682 | Respuestas : 12 | Foro : Avanzado
Mensajes de error de una consulta en una base de datos
Buenas tardes.
Abriendo un nuevo tema y gracias por la ayuda anterior.
Se quiere crear un mensaje de error dentro de un while() al conectar con una base de datos de MySQL donde, dependiendo del valor de una variable, muestre el error. Voy a mostrar el código:
$dbh = DBI->connect("DBI:mysql:otrs","root",'root');
$sql = "select name, ticket_id, history_type_id, create_time
from ticket_history where history_type_id in (1,16,27)and ticket_id =$algo";
$sth = $dbh->prepare($sql);
$sth->execute;
while( ($name, $ticket_id, $history_type_id, $create_time,) =$sth->fetchrow() ...
Abriendo un nuevo tema y gracias por la ayuda anterior.
Se quiere crear un mensaje de error dentro de un while() al conectar con una base de datos de MySQL donde, dependiendo del valor de una variable, muestre el error. Voy a mostrar el código:
$dbh = DBI->connect("DBI:mysql:otrs","root",'root');
$sql = "select name, ticket_id, history_type_id, create_time
from ticket_history where history_type_id in (1,16,27)and ticket_id =$algo";
$sth = $dbh->prepare($sql);
$sth->execute;
while( ($name, $ticket_id, $history_type_id, $create_time,) =$sth->fetchrow() ...
Read more : Mensajes de error de una consulta en una base de datos | Vistas : 1110 | Respuestas : 1 | Foro : Bases de datos
Gráficas de barras
Siguiendo el tutorial de graficación del foro, compiló el programa correctamente y al ejecutarlo obtengo una serie de caracteres ilegibles y no entiendo qué tengo que hacer. El programa es:
#!/usr/bin/perl -w
use strict;
use CGI ':standard';
use GD::Graph::bars;
# <img src="http://localhost:8080/Perl Express/sripts/Grafica de barras.cgi" alt="Visitas Mensuales"> ;
# Defino los arreglos y la matriz
my @campos = ('Oct 2003','Nov 2003','Dec 2003','Ene 2004','Feb 2004');
my @valores = ('547','2282','2798','2354','4326');
my @graf = (\@campos, \@valores);
my $grafico ...
#!/usr/bin/perl -w
use strict;
use CGI ':standard';
use GD::Graph::bars;
# <img src="http://localhost:8080/Perl Express/sripts/Grafica de barras.cgi" alt="Visitas Mensuales"> ;
# Defino los arreglos y la matriz
my @campos = ('Oct 2003','Nov 2003','Dec 2003','Ene 2004','Feb 2004');
my @valores = ('547','2282','2798','2354','4326');
my @graf = (\@campos, \@valores);
my $grafico ...
Read more : Gráficas de barras | Vistas : 614 | Respuestas : 1 | Foro : Básico
Problemas con HTML::TableExtract
Estimados..
Estoy tratando de obtener la información de una tabla HTML con el módulo HTML::TableExtract, pero no funciona nada de nada...
He probado un ejemplo dado por explorer link, pero no me muestra absolutamente nada :s
#!/usr/bin/perl
use LWP::Simple;
use HTML::TableExtract;
my $pagina = get('http://www.bcentral.cl/');
my $te = HTML::TableExtract->new( attribs => { summary => 'Indicadores diarios' } );
$te->parse($pagina);
foreach $tabla ($te->tables) {
foreach $fila ($tabla->rows) {
print " ", join(', ', @$fila), ...
Estoy tratando de obtener la información de una tabla HTML con el módulo HTML::TableExtract, pero no funciona nada de nada...
He probado un ejemplo dado por explorer link, pero no me muestra absolutamente nada :s
#!/usr/bin/perl
use LWP::Simple;
use HTML::TableExtract;
my $pagina = get('http://www.bcentral.cl/');
my $te = HTML::TableExtract->new( attribs => { summary => 'Indicadores diarios' } );
$te->parse($pagina);
foreach $tabla ($te->tables) {
foreach $fila ($tabla->rows) {
print " ", join(', ', @$fila), ...
Read more : Problemas con HTML::TableExtract | Vistas : 580 | Respuestas : 2 | Foro : Básico
Paginación en tabla HTML
Hola, a ver si podéis ayudarme.
Utilizo un template HTML con una tabla para mostrar los datos recuperados de una base de datos.
Me gustaría mostrarlos de 10 en 10. ¿Algún método recomendable y sencillo?
<HTML>
<HEAD>
<title> My users</title>
</HEAD>
<p ALIGN = "center" ><a href="?mode=new">Create new user</a>
<a href="?mode=upd">Update my account</a></p>
<br>
<h2 >List of users created by </h2>
<body>
<FORM METHOD=POST ACTION="app.pl">
<input type="hidden" name="mode" value="mod">
<table border=2 width="60%" ...
Utilizo un template HTML con una tabla para mostrar los datos recuperados de una base de datos.
Me gustaría mostrarlos de 10 en 10. ¿Algún método recomendable y sencillo?
<HTML>
<HEAD>
<title> My users</title>
</HEAD>
<p ALIGN = "center" ><a href="?mode=new">Create new user</a>
<a href="?mode=upd">Update my account</a></p>
<br>
<h2 >List of users created by </h2>
<body>
<FORM METHOD=POST ACTION="app.pl">
<input type="hidden" name="mode" value="mod">
<table border=2 width="60%" ...
Read more : Paginación en tabla HTML | Vistas : 6439 | Respuestas : 21 | Foro : Básico
GTK2 - Resolución de la pantalla
Hola a todos,
Estoy buscando las forma de obtener la resolución de la pantalla para redimensionar unas ventanas. He visto unos ejemplos que hablan sobre usar una librería llamada "Gtk2::Gdk::Screen" y según lo que he buscado, esta librería viene en el paquete "libgtk2-perl-doc" pero aunque lo he instalado, ésta librería no la logro usar porque sigue sin estar disponible en el sistema.
¿¿¿ Alguien me podría dar una ayudita ???
Gracias.
P.D.: Uso Ubuntu 10.10.
Estoy buscando las forma de obtener la resolución de la pantalla para redimensionar unas ventanas. He visto unos ejemplos que hablan sobre usar una librería llamada "Gtk2::Gdk::Screen" y según lo que he buscado, esta librería viene en el paquete "libgtk2-perl-doc" pero aunque lo he instalado, ésta librería no la logro usar porque sigue sin estar disponible en el sistema.
¿¿¿ Alguien me podría dar una ayudita ???
Gracias.
P.D.: Uso Ubuntu 10.10.
Read more : GTK2 - Resolución de la pantalla | Vistas : 555 | Respuestas : 3 | Foro : Básico
Last 10 active topics
Estadísticas
Mensajes totales 36892 • Temas totales 7434 • Usuarios totales 1981