Buenas, gente. Mi duda es la siguiente:
Con este miniprogramita de Perl puedo escribrir en una tty:
#!/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
use strict;
open(FH , "< /dev/ttyx") || die "$!\n";
while (<FH>) {
print $_;
}
A la consola destino es como que se le bloquea ...