On Mon, 2 Jul 2001, Craig S Monroe wrote:
> Someone posted this to the list a couple of weeks back.
> It does not appear to be working....
> I cannot seem to find the reference to $^0
>
> my $clear;
> if ($^O =~ /mswin/i || $^O =~ /dos/i) {
> $clear = `cls`;
> }
> elsif ($^O eq 'linux') {
> $clear = `clear`;
> }
$^O is the operating system the version of Perl you are running was built
for. (That is Dollar Sign-Caret-Capital Oh, not Dollar Sign-Caret-Zero)
-- Brett
http://www.chapelperilous.net/btfwk/
------------------------------------------------------------------------
"There is no distinctly American criminal class except Congress."
-- Mark Twain
