Perl en Español

  1. Home
  2. Tutoriales
  3. Foro
  4. Artículos
  5. Donativos
  6. Publicidad
 

Leer tty

 
Publicar nuevo tema   Responder al tema    Foros de discusión -> Intermedio
Mensaje Vie Feb 29, 2008 1:41 pm
rklz
Perlero Nuevo
Perlero Nuevo
Registrado: 25 May 2007
Mensajes: 38
Ubicación: Rosario, Argentina
Leer tty Responder citando

Buenas, gente. Mi duda es la siguiente:

Con este miniprogramita de Perl puedo escribrir en una tty:
Perl:
#!/usr/bin/perl -w

use strict;

open(FH , ">> /dev/ttyx") || die "$!\n";

while (<>) {

print FH $_;

}

Pero cómo hago cuando quiero "interceptar" los comandos, porque cuando hago algo como lo siguiente
Perl:
use strict;

open(FH , "< /dev/ttyx") || die "$!\n";

while (<FH>) {

print  $_;

}


A la consola destino es como que se le bloquea el prompt y no aparece lo que estoy escribiendo, pero tampoco me lo manda a mi...

Leí algo de Term::Readkey, pero quería saber si hace falta usar ese módulo ya que no es parte de los módulos que son estandar.
Mensaje Vie Feb 29, 2008 5:53 pm
creating021
Vive para Perl en Español
Vive para Perl en Español
Registrado: 23 Feb 2006
Mensajes: 487
Ubicación: Frente al monitor
Responder citando

Bueno, deberías de leer esto.

Aunque... ¿Qué es lo que queres hacer, espiar la tty o atrapar las salidas estándar de un programa?
Mensaje Vie Feb 29, 2008 9:44 pm
rklz
Perlero Nuevo
Perlero Nuevo
Registrado: 25 May 2007
Mensajes: 38
Ubicación: Rosario, Argentina
Responder citando

Gracias creating por responder:

Lo que quisiera hacer es "espiar" los comandos que se ejecutan en la otra tty, tanto para una pts como para una tty del sistema...



saludos
Mensaje Sab Mar 01, 2008 9:53 am
creating021
Vive para Perl en Español
Vive para Perl en Español
Registrado: 23 Feb 2006
Mensajes: 487
Ubicación: Frente al monitor
Responder citando

http://0xcc.net/ttyrec/
Publicar nuevo tema   Responder al tema    Foros de discusión -> Intermedio Todas las horas son GMT - 6 Horas
Página 1 de 1



Powered by phpBB © 2001, 2005 phpBB Group