RE: Win32::AdminMisc

2003-01-06 Thread steve silvers
I have checked this out. But still not working. If I use

@Geometry = Win32::AdminMisc::GetDriveGeometry(c:\);
this will work.
but

@Geometry = Win32::AdminMisc::GetDriveGeometry(\\server\c$);
and many different variations don't work!

any suggestions.

Thanks in advance.
Steve







From: Gibb, Thomas A [EMAIL PROTECTED]
To: steve silvers [EMAIL PROTECTED],   
[EMAIL PROTECTED]
Subject: RE: Win32::AdminMisc
Date: Mon, 6 Jan 2003 13:09:10 -0800

Yes it will, refer to Dave Roth's site (http://www.roth.net/
http://www.roth.net/ ) for detailed information and POD descriptive
document. Extensive information in the Administrators Handbook and well
worth the expense.



It covers everything. If it doesn't then an additional module would be
Win32::Lanman



HTH



Tom Gibb

-Original Message-
From: steve silvers [mailto:[EMAIL PROTECTED]]
Sent: Monday, January 06, 2003 12:58 PM
To: [EMAIL PROTECTED]
Subject: Win32::AdminMisc



Does anyone know if this module will let you get the data from remote
machines, and if yes how do you specify this?  server\drive

Thanks in advance.
Steve






_
The new MSN 8: smart spam protection and 2 months FREE*
http://join.msn.com/?page=features/junkmail
http://join.msn.com/?page=features/junkmail

___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
http://listserv.ActiveState.com/mailman/mysubs



_
MSN 8 with e-mail virus protection service: 2 months FREE* 
http://join.msn.com/?page=features/virus

___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs


RE: Win32::AdminMisc

2003-01-06 Thread Gibb, Thomas A
Title: RE: Win32::AdminMisc









Steve
wrote:

I have checked this out. But still not working. If I
use 

@Geometry =
Win32::AdminMisc::GetDriveGeometry(c:\); 
this will work. 
but 

@Geometry = Win32::AdminMisc::GetDriveGeometry(\\server\c$);

and many different variations don't
work! 



You have become one of the latest DOUBLE QUOTE
escaped character victims

I believe the above line should be (server\\c\$)
in order to work. The \ and $ each need to be
escaped to function correctly in this instance.

any suggestions. 

Thanks in advance. 
Steve 

Tom Gibb







From: Gibb, Thomas A
[EMAIL PROTECTED] 
To: steve silvers
[EMAIL PROTECTED], 
[EMAIL PROTECTED]

Subject: RE: Win32::AdminMisc

Date: Mon, 6 Jan 2003 13:09:10
-0800 
 
Yes it will, refer to Dave
Roth's site (http://www.roth.net/

http://www.roth.net/ ) for detailed
information and POD descriptive 
document. Extensive information
in the Administrators Handbook and well 
worth the expense.

 
 
 
It covers everything. If it
doesn't then an additional module would be 
Win32::Lanman 
 
 
 
HTH 
 
 
 
Tom Gibb 
 
-Original Message-

From: steve silvers [mailto:[EMAIL PROTECTED]]

Sent: Monday, January 06, 2003 12:58 PM 
To:
[EMAIL PROTECTED] 
Subject: Win32::AdminMisc

 
 
 
Does anyone know if this module
will let you get the data from remote 
machines, and if yes how do you
specify this? server\drive 
 
Thanks in advance.

Steve 
 
 
 
 
 
 
_

The new MSN 8: smart spam
protection and 2 months FREE* 
http://join.msn.com/?page=features/junkmail

http://join.msn.com/?page=features/junkmail

 
___

Perl-Win32-Users mailing list

[EMAIL PROTECTED]

To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

http://listserv.ActiveState.com/mailman/mysubs

 



_

MSN 8 with e-mail virus protection
service: 2 months FREE* 
http://join.msn.com/?page=features/virus









RE: What URL should be set within PPM for ActiveState 6xx builds

2003-01-06 Thread Jonathan Epstein
Replying to my own post, I see that if you copy  extract
  http://www.activestate.com/PPMPackages/zips/6xx-builds-only/Bundle-Expect.zip
to your harddisk, CD to the extract directory, then everything APPEARS to go OK:

bash-2.05a$ ppm.bat install Bundle-Expect.ppd
Installing package 'Bundle-Expect.ppd'...
Installing C:\Perl\site\lib\Bundle\Bundle-Expect.pm
Writing C:\Perl\site\lib\auto\Bundle\Expect\.packlist


---

However, if you then try to install Expect, you get the error:

bash-2.05a$ ppm3.bat
PPM - Programmer's Package Manager version 3.0.1.
Copyright (c) 2001 ActiveState SRL. All Rights Reserved.

Entering interactive shell. Using Term::ReadLine::Stub as readline library.

Profile tracking is not enabled. If you save and restore profiles manually,
your profile may be out of sync with your computer. See 'help profile' for
more information.

Type 'help' to get started.

ppm install Expect
Error: no suitable implementation found for 'IO-Tty'.
ppm



This seems to be because in fact there isn't any real 'content' in the Windows portion 
of the Bundle-Expect ZIP file although the PPD says that it contains stuff for 
Windows.  Trying to install IO-Tty from 
http://www.activestate.com/PPMPackages/zips/6xx-builds-only/?_x=1
similarly fails because there's no Windows entry in that PPD:


bash-2.05a$ ppm.bat install IO-tty.ppd
Installing package 'IO-tty.ppd'...
Error installing package 'IO-tty.ppd': Read a PPD for 'IO-tty.ppd', but it is no
t intended for this build of Perl (MSWin32-x86-multi-thread)


With regard to one of my previous questions, sorry, I'd forgotten that PPDs are 
human-readable XML text files.

As a previous poster suggested, I think that this is a dead-end.  It seems that 
ActiveState's build process should be a bit more restrictive to avoid posting 
non-functional PPD/zip archives like this.

Jonathan

At 04:41 PM 1/6/2003 -0500, Jonathan Epstein wrote:
Sorry if I'm belaboring what's obvious to some people, but one can find the PPM but 
then be unable to install it, presumably because the PPM is incompatible.  E.g., on 
my system I run ppm3.bat and then see:

ppm rep
Repositories:
[1] LOCAL
[2] ActiveState Package Repository
[3] ActiveState PPM2 Repository
[4] 56plus
ppm rep describe 4
Describing Active Repository 4:
Name: 56plus
Location: http://www.activestate.com/PPMPackages/5.6plus/
Type: Webpage
ppm search Bundle-Expect
Using cached search result set 2.
  1. Bundle-Expect [1.09] Everything that Expect.pm needs
ppm install 1
Package 1:
Error: no suitable installation target found for package Bundle-Expect.
ppm



Here's part of my perl -v output:

ppm quit
bash-2.05a$ perl -v

This is perl, v5.6.1 built for MSWin32-x86-multi-thread
(with 1 registered patch, see perl -V for more detail)

Copyright 1987-2001, Larry Wall

Binary build 633 provided by ActiveState Corp. http://www.ActiveState.com
Built 21:33:05 Jun 17 2002


---

Similarly, I tried copying this PPD manually from:
  http://www.activestate.com/PPMPackages/zips/6xx-builds-only/?_x=1
into my local repository, and got the same result (successful search, failed 
install).  A prior posting suggests that this should work for me since I use build 
633.

Perhaps others can shed light on this, and/or explain what version of Perl is 
necessary to satisfy the Original Poster's request.

Also, how can one look at a PPD's header and figure out whether it is compatible with 
the locally installed version of ActivePerl?

Jonathan



At 03:17 PM 1/6/2003 -0600, Gould, Kevin wrote:
Not really, since it makes reference to IO::Pty not being implemented on
the Windows platform, which is what I was struggling with.

I tried using IPC::Open2 as Jenda suggested but am having some real
problems with buffering of the output from my console application -
basically, I can't get back everything it's given me in order to have
all the info I need to execute the next command.

-Original Message-
From: Jonathan Epstein [mailto:[EMAIL PROTECTED]] 
Sent: Monday, January 06, 2003 3:07 PM
To: Gould, Kevin; Perl Win32
Subject: RE: What URL should be set within PPM for ActiveState 6xx
builds

The following links look promising in this regard:

http://groups.google.com/groups?hl=enlr=ie=UTF-8oe=UTF-8threadm=8937
68e9.0208122324.3239776c%40posting.google.comrnum=3prev=/groups%3Fq%3D
Expect.pm%2BWindows%26hl%3Den%26lr%3D%26ie%3DUTF-8%26oe%3DUTF-8%26scorin
g%3Dd
http://www.activestate.com/PPMPackages/5.6plus/

Note that the latter includes something called 'Bundle-expect'.

Jonathan

At 02:27 PM 1/6/2003 -0600, Gould, Kevin wrote:
I had the same question when I was trying to solve this the other day.

-Original Message-
From: Wagner, David --- Senior Programmer Analyst --- WGO
[mailto:[EMAIL PROTECTED]] 
Sent: Monday, January 06, 2003 2:20 PM
To: 'Cameron Dorey'; 'Perl Win32'
Subject: RE: What URL should be set within PPM for ActiveState 6xx
builds

I went there and from looking at the ActiveState setup, it
seems

RE: Win32::AdminMisc

2003-01-06 Thread Edwards, Mark \(CXO\)
Make sure you have permissions to the share and remember to use \\ for
each \.  Even better, use / as in
Win32::AdminMisc::GetDriveGeometry(//server/share).  The documentation
on CPAN says you need a trailing / at the end of a UNC name but it seems
to work without it.

-Original Message-
From: steve silvers [mailto:[EMAIL PROTECTED]] 
Sent: Monday, January 06, 2003 2:47 PM
To: [EMAIL PROTECTED]; [EMAIL PROTECTED]
Subject: RE: Win32::AdminMisc
Importance: Low


I have checked this out. But still not working. If I use

@Geometry = Win32::AdminMisc::GetDriveGeometry(c:\);
this will work.
but

@Geometry = Win32::AdminMisc::GetDriveGeometry(\\server\c$);
and many different variations don't work!

any suggestions.

Thanks in advance.
Steve






From: Gibb, Thomas A [EMAIL PROTECTED]
To: steve silvers [EMAIL PROTECTED],   
[EMAIL PROTECTED]
Subject: RE: Win32::AdminMisc
Date: Mon, 6 Jan 2003 13:09:10 -0800

Yes it will, refer to Dave Roth's site (http://www.roth.net/ 
http://www.roth.net/ ) for detailed information and POD descriptive 
document. Extensive information in the Administrators Handbook and well

worth the expense.



It covers everything. If it doesn't then an additional module would be 
Win32::Lanman



HTH



Tom Gibb

-Original Message-
From: steve silvers [mailto:[EMAIL PROTECTED]]
Sent: Monday, January 06, 2003 12:58 PM
To: [EMAIL PROTECTED]
Subject: Win32::AdminMisc



Does anyone know if this module will let you get the data from remote 
machines, and if yes how do you specify this?  server\drive

Thanks in advance.
Steve






_
The new MSN 8: smart spam protection and 2 months FREE* 
http://join.msn.com/?page=features/junkmail
http://join.msn.com/?page=features/junkmail

___
Perl-Win32-Users mailing list [EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
http://listserv.ActiveState.com/mailman/mysubs



_
MSN 8 with e-mail virus protection service: 2 months FREE* 
http://join.msn.com/?page=features/virus

___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



Re: Win32::OLE with Active directory question

2003-01-06 Thread Joe Richards
This is completely a non-perl response and a non-adsi response which is
where the issue is for this question but once I saw the recommendations of
ADSIEdit and LDP I had to put in a command line tool recommendation
especially since it is one I wrote. :op  Check out adfind which you can get
on the free win32 tools page of www.joeware.net; I actually script around it
with Perl on a nearly daily basis. It does command line LDAP Searches
against AD and since it uses LDAP instead of ADSI I am able to easily get
all attributes for an object. It will decode several of the main attributes
that are binary (Octet Strings) such as SID's, GUID's, etc.

You can also/alternatively look at ldapsearch from the iPlanet SDK which has
a little trouble with AD sometimes and you can also look at search.vbs which
is in the support tools of Windows 2000 but again that uses ADSI and you
need to specify specific attributes to return.

The answer to your question is the answer to the question How do you
enumerate all attributes for an instantiated object with an ADSI LDAP
query? and I don't think I have ever seen that but it definitely doesn't
mean it isn't possible or doesn't exist. I know you can query the Schema and
find out all properties that are possible but in most implementations you
will find tens if not hundreds of attributes that aren't used on a majority
of the objects.

  joe

--
- Original Message -
From: Sean Johnson [EMAIL PROTECTED]
To: Norris, Joseph [EMAIL PROTECTED]; Perl Win32 Users (E-mail)
[EMAIL PROTECTED]
Sent: Monday, January 06, 2003 8:34 AM
Subject: RE: Win32::OLE with Active directory question


You might want to look at the object through ADSIEdit and LDP ... I've
used both many times when I'm trying to figure out what attributes are
available, etc.

Sean

___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



open file question

2003-01-06 Thread Mark Zvolanek
Is there a difference between two lines shown below?
Both open a file for writing.

open FH, out.log;
open FH, , out.log;

Thanks
Mz
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



Win32::OLE and Excel, Word, Access etc.

2003-01-06 Thread Jack
I see many questions on this list asking about using Win32::OLE in interacting
with these (and other MS programs). Could someone point me to either a book or
online documentation which reveals all the methods one can use with each
program?

For example from a recent post:

$excel - {DisplayAlerts} = 0;
$book - SaveAs ($pwd\\spreadsheet.xls);

Where would one find out what the DisplayAlerts variable is? Where is SaveAs
documented?

Jack
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



Thread return value problem

2003-01-06 Thread Gianvittorio Negri
Hi perl guru

I'm new to thread in perl and during my exercise I experiment a problem
retrieving data from a child thread.

Using the world famous tecnique of cut  paste, I get some piece of code
from docs and I'v build a full script. 
This script is pasted at the bottom, and work ok from thread poit of view.
The problem happen when I try to retrieve the content of the 
array build inside the thread subroutine. The print statament inside the sub
show the content of the array and it is ok for every thread.
The subsequent print statement outside the sub code, give me strange values
and not what I expect, in other words what is wrong in my 
code ?

I'v also tried to submit the sample code find in HTML docs perlthrtut -
tutorial on threads in Perl section Waiting For A Thread To Exit 
with the same result.
Someone know wher is my error/misunderstanding.
Many tanks for attention, best regards and Happy new perl-year
Gianvy
(sorry for my poor english, I understand your difficult task, decode my mail
and after understand my problem, tankyou again)

Screenshot of the sample code
==
D:\CONTAINERperl
use threads;
$thr = threads-new(\sub1);   
 @ReturnData = $thr-join;
print Thread returned @ReturnData;sub sub1 { return Fifty-six,
foo, 2; }
^Z
Thread returned 2



My script

use threads; 
use threads::shared;
   
sub loop {

threads-yield;
my $thread = shift
my $foo = 5;
while($foo--) { 
$temp=in thread $thread;
@Rdt=(@Rdt,$temp);
}
print @Rdt\n;
return @Rdt;
}

$thread1 = threads-new(\loop, 'A');
$thread2 = threads-new(\loop, 'B');
$thread3 = threads-new(\loop, 'C');
$thread4 = threads-new(\loop, 'D');
$thread5 = threads-new(\loop, 'E');
$thread6 = threads-new(\loop, 'F');

@Rdt1=$thread1-join;
@Rdt2=$thread2-join;
@Rdt3=$thread3-join;
@Rdt4=$thread4-join;
@Rdt5=$thread5-join;
@Rdt6=$thread6-join;

print
(Data1\n@Rdt1\nData2\n@Rdt2\nData3\n@Rdt3\nData4\n@Rdt4\nData5\n@Rdt5\nData
6\n@Rdt6\n);


===

My script output (only the section regarding the last print statement,
previous statement output a lot of data and is OK)

Data1
10
Data2
10
Data3
10
Data4
10
Data5
10
Data6
10


___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



Re: open file question

2003-01-06 Thread $Bill Luebkert
Mark Zvolanek wrote:
 
 Is there a difference between two lines shown below?
 Both open a file for writing.
 
 open FH, out.log;
 open FH, , out.log;

The comma between  and out.log would normally be a period - not sure how the 
comma is treated since it's not part of an EXPR, but more of an operator.

-- 
  ,-/-  __  _  _ $Bill Luebkert   ICQ=14439852
 (_/   /  )// //   DBE Collectibles   Mailto:[EMAIL PROTECTED] 
  / ) /--  o // //  http://dbecoll.tripod.com/ (Free site for Perl)
-/-' /___/__/_/_ Castle of Medieval Myth  Magic http://www.todbe.com/
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



CGI and client side

2003-01-06 Thread Mundell, R. \(Ronald\)
Title: CGI and client side





Good Day All


I know that when one write an app under perl it runs on the web server. is it not possible to write a app in perl to run on both the server and the client

Ronald