Re: Native Ptys on windows

2005-04-21 Thread Edward Peschko
On Thu, Apr 21, 2005 at 06:38:08PM -0700, Jan Dubois wrote: > On Thu, 21 Apr 2005, Edward Peschko wrote: > > I noticed that ActiveState had ported Expect to windows, and would > > like to use the perl Expect module natively on win32 rather than write > > a wrapper around Expect (the program). > > >

Re: missing package Mac::BuildTools

2005-04-21 Thread Paul Rogers
I recently had this problem in one module I used...I went in to the module's source and disabled the portion that called the mac module (as it wasn't relevant to a win32 platform anyway). I'd say the same approach will work for you as well. Paul --- __

RE: Native Ptys on windows

2005-04-21 Thread Jan Dubois
On Thu, 21 Apr 2005, Edward Peschko wrote: > I noticed that ActiveState had ported Expect to windows, and would > like to use the perl Expect module natively on win32 rather than write > a wrapper around Expect (the program). > > Who did the Expect translation at ActiveState, and how easy would > i

Re: Filename pull

2005-04-21 Thread $Bill Luebkert
Dirk Bremer wrote: Added my version of re as RE2 and modified your test slightly to produce the results below. RE1 fails on /'s in the path. parse and RE1 have a problem when there is no '.' - the problem being how do you tell 'fubar' from 'fubar.' ? RE1 also fails to find 'fubar'. This tests

Native Ptys on windows

2005-04-21 Thread Edward Peschko
hey all, I noticed that ActiveState had ported Expect to windows, and would like to use the perl Expect module natively on win32 rather than write a wrapper around Expect (the program). Who did the Expect translation at ActiveState, and how easy would it be to modify IO::Pty to be native on win32

Re: missing package Mac::BuildTools

2005-04-21 Thread Sisyphus
- Original Message - From: "Markus" <[EMAIL PROTECTED]> > > one of my library required Mac::BuildTools, which I can't find under CPAN. > > Have anyone a idea, where I can get the module?. > Google turns up a few references to 'macperl/macos/lib/Mac/BuildTools.pm' - so I'm thinking that

RE: Filename pull

2005-04-21 Thread Chris Wagner
In a character class put the - first so it's not interpreted as a range. [-\w\._\s] At 05:11 PM 4/21/05 -0500, Dirk Bremer wrote: >False [] range "_-\s" before HERE mark in regex m/\\([\w\._-\s << HERE >]+)$/ at C:\Perl\Scripts\regex.pl line 7. >>CompID.properties< -- REMEMBER THE WORLD TRAD

Re: Win32::Guitest

2005-04-21 Thread $Bill Luebkert
Jim Hansen wrote: > Bill, > > here is one thing that is very odd.. > > I made the following mods in your script and > everything seems to work: > > use Win32::Process; > use Win32 (); > use Win32::GuiTest qw(FindWindowLike GetWindowText > SetForegroundWindow); > > my $PObj; > my $app_path = shi

Problems with Win32::Perms

2005-04-21 Thread StoneBeat
Hi i want to set and audit ACL to a registry key with Win32::Perms and I have this code: --- use Win32::Perms; use Win32; $regkey = new Win32::Perms( 'HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run', PERM_TYPE_REGISTRY) || die "Error: ($^E)" ; $regkey->AddAudit("Everyon

RE: Filename pull

2005-04-21 Thread Chris Wagner
The offset of the last element in an array is $#array. So $array[$#array] is the last value. At 03:58 PM 4/21/05 -0400, Chris wrote: >> $s1 = "c:\\temp\\foo.pl"; >> $barename = (split( /\\/, $s1)[2]; # $barename gets "foo.pl" To do it in one shot you can do: $last = (reverse (split /\\/, $s1)

RE: Filename pull

2005-04-21 Thread Dirk Bremer
Here's some interesting results: #! C:/perl/bin/perl -w use diagnostics; use strict; use warnings; use Benchmark; my $str = 'C:\Program Files\Oracle\Inventory\Components21\oracle.swd.jre\1.1.8.16.0\resources\ CompID.properties'; timethese(0,{'regex' => sub {$str =~ /\\([\w\._-\s]+)$/g; return($1)

RE: Filename pull

2005-04-21 Thread Chris
> I've got this problem: pulling the bare filename off of a fully pathed string, using split. The tricky part is getting the > last element in the array when I don't know how many members are in it. Example: > $s1 = "c:\\temp\\foo.pl"; > $barename = (split( /\\/, $s1)[2]; # $barename gets "foo.

missing package Mac::BuildTools

2005-04-21 Thread Markus
Hi all,   one of my library required Mac::BuildTools, which I can’t find under CPAN. Have anyone a idea, where I can get the module?.   Thanks Markus ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubs

Re: Win32::Guitest

2005-04-21 Thread Jim Hansen
Bill, here is one thing that is very odd.. I made the following mods in your script and everything seems to work: use Win32::Process; use Win32 (); use Win32::GuiTest qw(FindWindowLike GetWindowText SetForegroundWindow); my $PObj; my $app_path = shift || @ARGV; (my $cmdline = $app_path) =~ s/^.

RE: Win32-API and ghostscript API

2005-04-21 Thread Lloyd Sartor
Rogers, John wrote on 04/20/2005 11:26:52 PM: > Rob and Lloyd, > Robs code actually works with gs8.15 > >I've just now noticed that the function you're accessing is called > >'gsapi_revision' whereas I'm accessing 'gsdll_revision'. > I got gsapi_ from the api.htm doc with gs8.15 gsdll_ is depr

Re: Win32::Guitest

2005-04-21 Thread Jim Hansen
Tried that. Didn't work, but I do find if I use the entire window name (Untitled - Notepad) vs just (notepad) then it isn't an issue, so the general searches apparently won't work. Bummer. Thanks for the help though. Jim --- $Bill Luebkert <[EMAIL PROTECTED]> wrote: > Jim Hansen wrote: > > > B

Re: Win32-API and ghostscript API

2005-04-21 Thread Sisyphus
- Original Message - From: "Rogers, John" <[EMAIL PROTECTED]> To: "'Perl-Win32-Users (E-mail)" Sent: Thursday, April 21, 2005 2:26 PM Subject: RE: Win32-API and ghostscript API I got gsapi_ from the api.htm doc with gs8.15 gsdll_ is depreciated. A dll export browser shows both though.