Re: algo sobre perl
Para posicionar el cursor en BASH o PERL o en cualquier lenguaje. Se pueden
utilizar secuencias de escape:
Por ejemplo
\e[10G Posiciona el cursor en la columna 10.
\e[10H Posiciona el cursor en la fila 10.
\[X;Ym Cambia el color a X e Y (fondo y primer plano).
Pueden ver el man console_codes para un listado completo. Sino puden ver el
fuente del /etc/init.d/functions del Red Hat (o SuSE y supongo que alguna
más) para ver cómo posicionan el cursor y cambian el color del los OK o
FAILED que aparecen cuando se levantan los servicios.
En PERL pueden probar este ejemplo:
#!/usr/bin/perl -w
print "\e[10H\e[10G Hola";
Y en BASH pueden probar este:
#!/bin/bash
echo -ne "\\033[10H\e[10G Hola"
Ambos programas imprimen "Hola" en la posición 10, 10 de la consola.
Saludos
--
Juan Manuel Mouriz - jmouriz@design.com.py
Administrador de redes / Programador
Design Multimedia - http://www.design.com.py/
Eusebio Lillo 2503
Asunción - Central
Paraguay
Teléfono/Fax: +595 (21) 614-999
http://www.sniffer.com.ar/
Reply to: