Mailing-List: contact cygwin-help AT cygwin DOT com; run by ezmlm
List-Subscribe: <mailto:cygwin-subscribe AT cygwin DOT com>
List-Archive: <http://sources.redhat.com/ml/cygwin/>
List-Post: <mailto:cygwin AT cygwin DOT com>
List-Help: <mailto:cygwin-help AT cygwin DOT com>, <http://sources.redhat.com/ml/#faqs>
Sender: cygwin-owner AT cygwin DOT com
Mail-Followup-To: cygwin AT cygwin DOT com
Delivered-To: mailing list cygwin AT cygwin DOT com
X-Authentication-Warning: slinky.cs.nyu.edu: pechtcha owned process doing -bs
Date: Mon, 3 Mar 2003 10:51:31 -0500 (EST)
From: Igor Pechtchanski <pechtcha AT cs DOT nyu DOT edu>
Reply-To: cygwin AT cygwin DOT com
To: Philippe Verdret <philippe DOT verdret AT xps-pro DOT com>
cc: cygwin AT cygwin DOT com, <cygwin-xfree AT cygwin DOT com>
Subject: Re: Control the cygwin terminal with escape sequences
In-Reply-To: <000401c2e188$55ef6770$260101c0@XEROXPVERDRET>
Message-ID: <Pine.GSO.4.44.0303031038320.25599-100000@slinky.cs.nyu.edu>
Importance: Normal
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII

Redirecting to the correct list.  Please remove <cygwin-xfree at cygwin
dot com> from replies.

On Mon, 3 Mar 2003, Philippe Verdret wrote:

> Hi,
>
> i want to control the cygwin terminal with escape sequences generated
> by a Perl program.
>
> I can clear the screen with the echo command:
> % echo -e "\033[H\033[J"
>
> but if i write a small inline perl program, i can't:
>
> % perl -e 'print "\033[H\033[J"'
>
> This doesn't work even if i put the screen in 'raw mode' without echo
> (with system('stty -echo raw') in the perl program).
>
> Can you help me?
>
> Philippe

And answering:

Philippe,

Works for me (using cygwin-1.3.20, bash-2.05b-8 and perl-5.6.1)...  You
might want to report your problem properly, as described in
<http://cygwin.com/bugs.html>.  Also, check that your perl one-liner
outputs exactly the right sequence (by piping it to "od -c", for example).
	Igor
-- 
				http://cs.nyu.edu/~pechtcha/
      |\      _,,,---,,_		pechtcha AT cs DOT nyu DOT edu
ZZZzz /,`.-'`'    -.  ;-;;,_		igor AT watson DOT ibm DOT com
     |,4-  ) )-,_. ,\ (  `'-'		Igor Pechtchanski
    '---''(_/--'  `-'\_) fL	a.k.a JaguaR-R-R-r-r-r-.-.-.  Meow!

Oh, boy, virtual memory! Now I'm gonna make myself a really *big* RAMdisk!
  -- /usr/games/fortune


--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Bug reporting:         http://cygwin.com/bugs.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/