Well ... Nothing in Programming Perl Perl Cookbook pointed me to CPAN, and I found Term::Cap and Term::Screen
This works on Linux: #!/usr/bin/perl use strict; use warnings; require Term::Screen; my $scr = new Term::Screen; unless ($scr) { die " Something's wrong \n"; } $scr->clrscr(); It does NOT work on Windows 2000! So, I really don't know how to help you... Aloha => Beau. -----Original Message----- From: Jensen Kenneth B SrA AFPC/DPDMPQ [mailto:[EMAIL PROTECTED]] Sent: Thursday, January 02, 2003 4:38 AM To: [EMAIL PROTECTED] Subject: RE: Clear command in perl? Mostly for portability. Also just like to stray away from using system commands when at all possible. -----Original Message----- From: Beau E. Cox [mailto:[EMAIL PROTECTED]] Sent: Thursday, January 02, 2003 8:35 AM To: Jensen Kenneth B SrA AFPC/DPDMPQ; [EMAIL PROTECTED] Subject: RE: Clear command in perl? Hi - Yes: system ("clear"); :) I don't really know, but what is wrong with the 'system' approach? The overhead should be minimal since 'clear' is embedded in the shell. Are you worried about portability? system ($^O =~ /win32/i ? 'cls' : 'clear'); (tested OK Win 2000 and Linux) Aloha => Beau. -----Original Message----- From: Jensen Kenneth B SrA AFPC/DPDMPQ [mailto:[EMAIL PROTECTED]] Sent: Thursday, January 02, 2003 4:26 AM To: '[EMAIL PROTECTED]' Subject: Clear command in perl? Is there a perl command equivalent to: system ("clear"); ? Thanks, Ken -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]