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: Tue, 4 Mar 2003 09:35:22 -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
Subject: RE: Control the cygwin terminal with escape sequences
In-Reply-To: <000001c2e22f$d585ef20$260101c0@XEROXPVERDRET>
Message-ID: <Pine.GSO.4.44.0303040929490.25599-100000@slinky.cs.nyu.edu>
Importance: Normal
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII

Philippe,

First off, there is no need to send the message directly to me -- I read
the list.  Hence the "Reply-To".

Secondly, I used the exact line you quoted in your message
(perl -e 'print "\033[H\033[J"').  It worked.
The only difference I can see is that you use ActiveState's perl, whereas
I use the Cygwin native perl.  I'm not even going to ask why (yet).

Did you try piping the output of the perl command to "od -c"?  What did it
show?  What is the value of your CYGWIN variable?  Are you running this in
an xterm, an rxvt, or a command window?  Did you attach the output of
"cygcheck -s -v -r" as indicated in <http://cygwin.com/bugs.html>?  Please
provide the above information if you want people to be able to address
your problem.
	Igor

On Tue, 4 Mar 2003, Philippe Verdret wrote:

> Hi Igor,
>
> After updating cygwin on my pc, i try again:
>
> % perl -e 'system("stty raw -echo") ; print "\e[H\e[J"'
>
> which doesn't clear the screen.
> I use the ActiveState Perl, 5.8.0, bash 2.05b.0(8) and cygwin-1.3.20-1.
> Can you send me a command line which work? I will try it.
>
> Many thanks,
> Philippe
>
>
> -----Message d'origine-----
> De : Igor Pechtchanski [mailto:pechtcha AT cs DOT nyu DOT edu]
> Envoye : lundi 3 mars 2003 16:52
> A : Philippe Verdret
> Cc : cygwin AT cygwin DOT com; cygwin-xfree AT cygwin DOT com
> Objet : Re: Control the cygwin terminal with escape sequences
>
>
> 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/