Is there a way to watch _all_ keyboard input?
I'd like to make a sort of Macro for inserting text into any
application. It would recognise a certain string and then act.
Any ideas?
Many Thanks,
Marcus
___
Perl-Win32-Users mailing list
[EMAIL PROTECT
Lee Goddard wrote:
> At 07:59 05/07/2002, $Bill Luebkert wrote:
>
>> I'm afraid you will find that that is the fastest method except you
>> wrote it wrong - there is no need for the while {} part:
>>
>> my $str = " this is a test files ";
>> $str =~ s/^\s+//; $str =~ s/\s+$//;
Carl Jolley [mailto:[EMAIL PROTECTED]] wrote:
> On Fri, 5 Jul 2002, Lee Goddard wrote:
>
> > At 07:59 05/07/2002, $Bill Luebkert wrote:
> >
> > >I'm afraid you will find that that is the fastest method except you
> > >wrote it wrong - there is no need for the while {} part:
> > >
> > >my $str = "
George ---
The Windows call itself is SetWindowsHookEx(). You should
read up on the hooks WH_KEYBOARD and WH_KEYBOARD_LL.
This is a VERY powerful API. Make sure you can trust the
module that executes this Windows call on your behalf!
I'm not aware of one but there's no reason one couldn't exist.
Both the Shortcut key and macro approaches don't quite
give what I need. I intend a persistent process
maintaining state (including all copy-buffer contents)
continuously. I could have a shortcut-launched
program read in and write out the data at every
invocation, but that would be a very
resour
On Fri, 5 Jul 2002, Lee Goddard wrote:
> At 07:59 05/07/2002, $Bill Luebkert wrote:
>
> >I'm afraid you will find that that is the fastest method except you
> >wrote it wrong - there is no need for the while {} part:
> >
> >my $str = " this is a test files ";
> >$str =~ s/^\s+/
Hello ... I am trying to make a system call but I keep getting an error ...
if I run this from the command line it works fine ... any ideas??
system qq(d:\\modusmail\\mailbox.exe -set $popname ForwardTo
$forwardaddress);
returns the error
Cannot connect to Error 5: Access is denied
This is runn
> PS I would settle for a free command line as well.
http://www.weihenstephan.de/~syring/win32/UnxUtils.html
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Actually, flipping through the Effective Perl Programming book, I see
that there is an example of nested braces.
snip
from book:
$_ = "
Here are { nested {} {braces} }!";{ my $c;
while(/([{}])/gc) { last unless ($c += {qw({ 1 }
-1)}->{$1}) > 0 };}print substr substr($_, 0, pos()),
Hi everyone,
Before I got some great tips from others in the list, I was aware of the
stat function and been usign localtime function. Someone mentioned the time
fucntion and I am pretty sure it will handle my problem. Thanks everyone for
your help.
- Res
- Original Message -
From: "Sisy
$string = "( A = (B= (D = 1) (P =1 ))
( F = (Y = 2 ) ( w = 3)) (B = (D = 3) ( P = 4)) )";
while($string =~
/\(\s*(\w+\s*\=\s*(?:\(\s*\w+\s*\=\s*\d+\s*\)\s*)+)\)/ig) {
print "\n$1"; # just to print them. or push
@matches, $1; # push the matched into an array for later
use }print "
...someone from another Perl list I subscribe to mentioned about this
function: File::Find (perldoc File::Find , hint = "-mmin")...maybe this may
resolve the issues with modification time in Win32.
- res
- Original Message -
From: "Tillman, James" <[EMAIL PROTECTED]>
To: <>
Sent: Wednesd
Hi everyone,
Before I got some great tips from others in the list, I was aware of the
stat function and been usign localtime function. Someone mentioned the time
fucntion and I am pretty sure it will handle my problem. Thanks everyone for
your help.
- Res
- Original Message -
From: "Sis
You could be having an issue similar to what I'm trying to sort out - this
link may help
http://perl.plover.com/FAQs/Buffering.html
else, this could be a genuine timeout issue
-Original Message-
From: Erich C. Beyrent [mailto:[EMAIL PROTECTED]]
Sent: Friday, July 05, 2002 3:21 PM
To: [EMA
> Hello there.
>
> I've got some old script which manage the NT useradministration. In this
> script the module AdminMisc is used.
> I saw in the ActivePerl Version 5 AdminMisc is no longer implemeted.
>
> So, which Module has now the functions of AdminMisc ?
>
> Or is there any ready actual s
Hey everyone,
I have a wxPerl app that is using Net::Telnet to connect to a UNIX host to
run a script. As you can see from the example, the script is exectuted, and
then I want to watch the output log get updated, but I want to pipe that
into a Text area on the wxPerl app. I can't seem to figur
At 07:59 05/07/2002, $Bill Luebkert wrote:
>I'm afraid you will find that that is the fastest method except you
>wrote it wrong - there is no need for the while {} part:
>
>my $str = " this is a test files ";
>$str =~ s/^\s+//; $str =~ s/\s+$//;
>print $str, "\n";
What's wrong
Hi,
I need to extract bracket
matching text from text full of opening and closing
brackets like
( A = (B= (D = 1) (P =1 )) ( F =
(Y = 2 ) ( w = 3)) (B = (D = 3) ( P = 4)) )
I need to
extract text starting from (B = or ( F = or all texts starting with
(B = like to the te
Lee Goddard wrote:
> What's wrong with:
>
> s/^\s+(.*[^\s]+)\s+$/$1/sg;
the (possibly) wrong part is that your regex fails unless there
are whitespaces *both* in front and at the end of the string.
try this:
$str = "this is a test files ";
$str =~ s/^\s+(.*[^\s]+)
19 matches
Mail list logo
