I was going to repsond on another email list to how to get f1, f2 keys by
using Term::InKey, but I get this when I try the script from doc provided:
C:\>perl aapl478.pl
print (...) interpreted as function at C:/Perl/site/lib/Term/InKey.pm line 202.
Argument "STD_INPUT_HANDLE" isn't numeric in numeric eq (==) at
C:/Perl/site/lib/Win32/Console.pm line 98.
Not implemented on MSWin32: The handle is invalid at C:/Perl/site/lib/Term/InKey.pm
line 21.
Press any key to clear the screen:
I installed the pm and here is what it displayed:
ppm> search inkey
Searching in Active Repositories
1. Term-InKey [1.02] Perl extension for clearing the screen and receiving ~
ppm> install term-inkey
====================
Install 'term-inkey' version 1.02 in ActivePerl 5.8.2.808.
====================
Downloaded 3132 bytes.
Extracting 5/5: blib/arch/auto/Term/InKey/.exists
Installing C:\Perl\html\site\lib\Term\InKey.html
Installing C:\Perl\site\lib\Term\InKey.pm
Successfully installed term-inkey version 1.02 in ActivePerl 5.8.2.808.
ppm> exit
I am on XP Professional and as you see above, running 5.8.2.
The script used:
use strict;
use Term::InKey;
print "Press any key to clear the screen: ";
my $x = &ReadKey;
&Clear;
print "You pressed $x\n";
Any ideas on what is happening?
Thanks.
Wags ;)
9-8-002-2224
**********************************************************
This message contains information that is confidential
and proprietary to FedEx Freight or its affiliates.
It is intended only for the recipient named and for
the express purpose(s) described therein.
Any other use is prohibited.
****************************************************************
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
