• Jueves 14 de Noviembre de 2024, 21:39

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - Podwor

Páginas: [1] 2
1
Perl / Re: Graficos. Lib Gd
« en: Miércoles 4 de Enero de 2006, 18:49 »
Gracias !!!! muy bueno!!

2
C/C++ / Re: Ocr Algun Codigo De Ayuda??
« en: Lunes 7 de Noviembre de 2005, 17:49 »
¿Optical Character Recognition ??
El trabajo consiste en tomar una sola letra en formato jpg o bmp y que este reconozca que letra es. Si alguien me puede ayudar se los agradeceria mucho.

Suerte!

3
Perl / Re: Una Distro De Linux En Perl!!!!!!!!!
« en: Lunes 7 de Noviembre de 2005, 17:28 »
Muy bueno -su gracias por el dato!!
La verdad que estan locos  :kicking:

4
C/C++ / Ocr Algun Codigo De Ayuda??
« en: Viernes 4 de Noviembre de 2005, 21:33 »
Hola a todos! Tengo que hacer un OCR muy sencillo en C. Alguna idea o alguien que me pueda pasar alguna ayuda?
Saludos!

5
Perl / Re: Sub Como Exec &&
« en: Sábado 29 de Octubre de 2005, 13:40 »
Entiendo tu problema,  cuando haces esto "exec server &" desde tu shell seguramente tienes que darle uno o dos enter para que el shell te responda nuevamente. Cosa que me pasa mi por lo que no puedo  hacer system("exec server &"); ya que se me queda como  "Zombie"  como tu has dicho.

Yo solucione el problema con dos hilos, el hilo secundario "para el servidor"  lo corri sin & o sea que tu harias system("exec server"); y el hilo principal seguiria el script de tu programa.

Saludos!

6
Perl / Re: Sub Como Exec &&
« en: Viernes 28 de Octubre de 2005, 18:46 »
Si ya lo se  su -, de ahi me pregunta ya que a mi al dejarlo en background el sigue esperando algun tipo de retorno y se queeeeeda ahi.
Si vos lo solucionaste, cual es tu problema?

Saludos!!

7
Perl / Re: Sub Como Exec &&
« en: Viernes 28 de Octubre de 2005, 00:48 »
Entiendo su -  
una pregunta  no se queda colgado haces el  system("exec server &") ??
Ese es tu problema?

8
Java / Prender Leds En Java Por Lpt
« en: Jueves 27 de Octubre de 2005, 19:57 »
Hola a todos!
Por favor si alguien me puede ayudar. Necesito prender 7 leds por mi puerto paralelo
y no consigo hacerlo desde java. Utilizo el javacomm para abrir el puerto. Pero no se como prender los leds  :(

Si alguien me puede ayudar!!

Gracias!!

9
Java / Re: Como Hacer Un *.exe De Un *.class ???
« en: Jueves 27 de Octubre de 2005, 14:40 »
Una pregunta, una vez hecho el exe puedo correrlo en cualquier maquina pc windows sin el jruntime o el sdk ??  o es necesario tenerlos instalados?

Gracias

10
Perl / Re: Sub Como Exec &&
« en: Jueves 27 de Octubre de 2005, 14:29 »
Buenas!
A ver si entiendo el problema, necesitas correr en simultaneo el server y el cliente?
Podrias hacer un programa con dos hilos. Uno el server y otro el cliente.
Es muy facil de hacer, si necesitas algun ejemplo avisame.

Saludos

11
Perl / Re: Graficos. Lib Gd
« en: Miércoles 26 de Octubre de 2005, 22:34 »
muchas gracias!!  Ahora empiezo a mirar!!

Saludos

12
Perl / Graficos. Lib Gd
« en: Lunes 10 de Octubre de 2005, 23:01 »
Hola a todos!
Alguien sabría como usar el GD para hacer imágenes ya sean tortas o barras sobre otra imagen? O algún otro modulo que lo permita?  No tengo problemas en sacar los gráficos pero necesito sobreponer los resultados sobre alguna imagen.
Muchas gracias!

13
Perl / Re: Mas Hilos, Problemas Con Variables Globales
« en: Martes 20 de Septiembre de 2005, 21:47 »
Me autocontesto, les paso un ejemplo de hilos que llamana a hilos y todos comparten y modifacan la misma variable.
Lo hice con semaforos (que esta comentado) y con variables globales.
Saludos!

use threads;
use threads::shared;
#use Thread::Semaphore;
use strict;
use Data::Dumper;

#my $semaphore = new Thread::Semaphore(5);
my $con:shared = 0;

MAIN: {

 my $thr = threads->new(\&baja);
 my $thr = threads->new(\&sube);
sleep 10;
#warn Dumper $semaphore;
warn $con;
}


sub baja{
my $j;
    for ($j = 1; $j < 20; $j++){
     my $thr = threads->new(\&sub_down);
    }
}

sub sube{
my $j;
    for ($j = 1; $j < 30; $j++){
     my $thr = threads->new(\&sub_up);
    }
}


 sub sub_down {
   #  $semaphore->down;
   lock $con;
   $con--;
  }

 sub sub_up {
   #  $semaphore->up;
   lock $con;
   $con ++;
  }

14
Perl / Mas Hilos, Problemas Con Variables Globales
« en: Martes 20 de Septiembre de 2005, 20:38 »
Ayuda!!! como puedo hacer para que los distintos  thread modifiquen una variable
global ?? Les paso un ejemplo que funciona pero solo modifica la variable en su
ambito y cuando sale de este sigue valiendo lo mismo que al principio;
Gracias!!!

    use Thread;
    our $a=5;
    use strict;
MAIN: {
my $j;
    for ($j = 1; $j < 11; $j++){
    my  $thr = new Thread \&sample_sub, 1;
    sleep 1;
   }
sleep 5;

}
 sub sample_sub {
         lock $a;
          warn "a sigue : $a";
          $a --;
           warn "a: $a";
    }

15
Perl / Re: Hilos En Perl
« en: Martes 20 de Septiembre de 2005, 19:17 »
ups, perdon me referia  a la cantidad de threads q puedo crear, poniendo a correr funciones simples por hilo ( calculos matematicos ).

$thrHilos = new Thread \&Funcion

Pero ya me conteste solo, por lo que vi depende de muchas cosas, variable, memoria asiganda, sistema operativo, etc.

Gracias!

16
Perl / Re: Hilos Y Conexiones Compartidas (ora_dbh_share)
« en: Martes 20 de Septiembre de 2005, 19:05 »
muchas gracias!!

17
Perl / Hilos En Perl
« en: Viernes 16 de Septiembre de 2005, 23:32 »
Hola a todos!
Una pregunta, alguno de ustedes ya trabajo con muchos hilos en Perl?  Estoy haciendo pruebas y no puedo pasar de 200 hilos. Y son hilos simples que cuentas y hacen sleep.
Que puedo esperar de Perl? O lo tengo que hacer en C ¿?

Saludos a todos!!
 :D

18
Perl / Re: De <stdin> A Letra Por Letra
« en: Jueves 8 de Septiembre de 2005, 20:38 »
Espero te sirva!!

$stdin = "hello";
@a = split //, $stdin;

foreach $b (@a)
{
  print $b."-";
}


el resultado seria  h-e-l-l-o

Claro una vez dentro del foreach podes tratar cada letra como quieras.
El split, como esta en este ejemplo, transforma tu $ en un @ para que  lo trates como tal.
Saludos

19
Perl / Re: S///g ?
« en: Jueves 8 de Septiembre de 2005, 20:23 »
Esto te ayudara

$string = "Tes/";

$string =~ s/\//t/g;


El resultado seria "Test"

Cuando trates con cualquier caracter que tenga algun significado para perl anteponle
el "\"    

Saludos!

20
Perl / Re: Problemas Con Utf-8
« en: Jueves 8 de Septiembre de 2005, 20:17 »
Tienes razon !! pero la verdad es que es para procesar un texto y sacar resultados.
Lo resolvi mas o menos pero sigue sin trabajar muy bien cuando se pasan entre paquetes.
De todas formas muchas gracias!!
Saludos a todos!

21
Perl / Problemas Con Utf-8
« en: Viernes 2 de Septiembre de 2005, 22:32 »
Buenas  a todos!! Ya conseguí hacer funcionar mis múltiples conexiones compartidas entre varios hilos, Muchas gracias!
Ahora tengo otro problema!!
Estoy haciendo un programa que revisa cuentas de correo y notifica nuevos mails. El programa funciona 99% pero tengo un problemon con los caracteres especiales ( á, ñ, etc.) Tengo la versión de perl 5.8 que en teoría soporta UTF-8  pero nada.
Si pongo en el código    use utf8    me sale el siguiente error.

Malformed UTF-8 character (1 byte, need 3, after start byte 0xe1) line 71.
Malformed UTF-8 character (1 byte, need 3, after start byte 0xe9) line 72.
…etc.

Si no pongo nada salen caracteres extraños en vez de mis queridas ñs y acentos.
Si alguien tiene alguna experiencia y sabe la respuesta se lo agradecería muchísimo!!
Saludos a todos!!

22
Perl / Re: Hilos Y Conexiones Compartidas (ora_dbh_share)
« en: Lunes 22 de Agosto de 2005, 17:20 »
Ok muchas gracias!! ah!!! no  te veo aun entre mis contactos!!!

23
Perl / Re: Hilos Y Conexiones Compartidas (ora_dbh_share)
« en: Sábado 20 de Agosto de 2005, 15:48 »
Antes que nada muchas gracias su -  
Creo que si cere mi variable, lo que pasa es que use comillas simples

our $orashr : shared = '';

que en el foro parecen que es una sola comilla doble. Pero de todas formas lo intente
asi

our $ops : shared = "";

y el problema es el mismo

Prototype mismatch: sub main::cond_wait: none vs (\[$@%];\[$@%]) at c:/Perl/lib/
Exporter.pm line 65.
Usage: $class->connect([$dsn [,$user [,$passwd [,\%attr]]]])

El problema es con la conexion, no puedo establecerla.
su -  no tendrias problema en ponerme entre tus contactos para pedirte SOCORRO!
Muchas gracias!

cellilli@hotmail.com

24
Perl / Hilos Y Conexiones Compartidas (ora_dbh_share)
« en: Miércoles 17 de Agosto de 2005, 14:55 »
Buenos dias a todos!! Tengo un problemilla como dira Flanders.......

Bueno estoy haciendo un programita que tiene que varios hilos (1 a 2000 ) dependiendo los clientes y necesito usar una misma conexion a la base de datos ya
que oracle se enfadaria mucho si abro una conexion por cada hilo!
Los hilos de mi programa con una conexion por hilo funciona bien pero como lo dije
antes no es factible.
Cuando usamos la misma conexion  para todos los hilos sale el siguiente error ( por supuesto!!)

(handles can't be shared between threads and your driver may need a CLONE method added )

Esta claro, pero aqui va el problema, no conozco ningun metodo CLONE para oracle en perl. Buscando un poquito encontre lo que parecia la solucion  ....  ora_dbh_share
que segun la documentacion me permitira compartir una conexion entre mis hilos.
El ejemplo que encontre de conexion es el siguiente

  our $orashr : shared = '' ;
  $dbh = DBI->connect ($dsn, $user, $passwd, {ora_dbh_share => \$orashr}) ;

Muy simple, pero ..... no funciona. Me da errores de compilacion cuando lo pongo en mi programa

our $ops : shared = '' ;
$dbh = DBI->connect("dbi:Oracle:xxxl","xxx/xxx",  { ora_dbh_share => \$ops }  ) or die " Not concected tu oracle\n";

El pedacito de codigo { ora_dbh_share => \$ops } es como si no lo reconociera como parte del DBI-> connect.  

Busque ejemplos en internet pero nada, solo trae muy pocas paginas que muestran el mismo ejemplito de conexion pero nada que pueda usar.

Si alguien tiene algo que me pueda ayudar les agradeceria enormemente.
Saludos

25
La taberna del BIT / Re: Opina De La Carrera Del Domingo
« en: Lunes 20 de Junio de 2005, 16:51 »
La verdad que la carrera fue un robo, antes era un fanático pero desde el año pasado lo fui dejando poco a poco porque ya me resultaban sumamente aburridas la carreras (siempre gana Michael Schumacher   ¡!)  y ahora con esto....... Creo que todos no vamos a hacer fanáticos del Gran Turismo Carretera o como se llame!!!!
Otra cosa, ya no parece un deporte sino un Bufete de Abogados viendo de donde sacar provecho para ganar una carrera., una vergüenza

Páginas: [1] 2