RE: Perl and authentication using LDAP

2003-11-25 Thread Edgington, Jeff
Install perl-ldap module.

use net::ldap

$ldap = Net::LDAP-new('your-server-here', port = 389, version = 3) ||
die failed: $@;

$mesg = $ldap-bind('[EMAIL PROTECTED]', password = $pw);

$mesg-code  die bind failed: $mesg-error;


More to it than the above, but that will bind you to the server.
(hint... install perl-ldap then run 'perldoc net::ldap')


 

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Kraaijer Ronald
Sent: Tuesday, November 25, 2003 8:29 AM
To: perl-win32-users
Subject: Perl and authentication using LDAP

Hello everybody,

I want to authenticate a particular user using LDAP, any ideas how this
is
done?



Disclaimer - Winterthur Europe Assurances - Avenue des Arts/Kunstlaan 56
-  1000 Brussels - Belgium.
This e-mail is intended solely for the above-mentioned recipient and it
may contain confidential or privileged information. If you have
received it in error, please notify the sender immediately and delete
the e-mail. You must not copy, distribute, disclose or take any
action in reliance on it. 
This e-mail message and any attached files have been scanned for the
presence of computer viruses. However, you are advised that 
you open any attachments at your own risk. 



___
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: download patches.

2003-07-08 Thread Edgington, Jeff
Not sure if you have investigated Microsoft's Software Update Services
(SUS -
http://www.microsoft.com/windows2000/windowsupdate/sus/default.asp)...
it may be what you are looking to achieve.

jeff e.



-Original Message-
From: Peter Guzis [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, July 08, 2003 12:23 PM
To: [EMAIL PROTECTED]
Subject: RE: download patches.


I tried this once and gave up due to lack of time.  While parsing XML
data can be fun, I think you will find it much easier to parse the
hfnetchk output than try to sort through the monster XML file it uses.

A larger problem is how to download patches.  Microsoft does not use one
standard web page for all technet/knowledge base/patch files.  This is
especially true with older patches.  In some cases you have a pulldown
with different languages and a submit button.  In others you have a
table of different downloads.  Sometimes you have a pseudo-tree view
with a patch details branch that needs to be expanded.  Do you see a
pattern here?

A few questions:
1. How many systems would this be running on?
2. Would this be for use on a production network?
3. Are you wanting to automatically install the patches too?
4. Is there a reason the Automatic Updates feature of Windows XP/Windows
2000 SP3 and above won't work?


Peter Guzis
Web Administrator, Sr.
ENCAD, Inc.
- A Kodak Company
email: [EMAIL PROTECTED]
www.encad.com 

-Original Message-
From: Molumuri, Janardhan [mailto:[EMAIL PROTECTED]
Sent: Monday, July 07, 2003 9:09 PM
To: '[EMAIL PROTECTED]'
Subject: download patches.


Hi all,

Can we automatically download patches, by parsing HFnetchk output and
XML file.

Thanks,
--janardhan.

___
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

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


RE: Staroffice 6.0

2002-12-28 Thread Edgington, Jeff
Title: Message



That's a 
commercial suite now (http://www.staroffice.com/)... if you 
OpenOffice.org (http://www.openoffice.org/)is where 
you need to go to get the equivalent to 6.0 but in the open 
form.



  
  -Original Message-From: Mundell, R. 
  (Ronald) [mailto:[EMAIL PROTECTED]] Sent: Friday, December 27, 
  2002 3:14 AMTo: Perl-Unix-Users (E-mail); Perl-Win32-Users 
  (E-mail)Subject: Staroffice 6.0
  Sorry to move off the track a bit but does any one know where 
  I can get hold of Staroffice 6? 


RE: Emailing using Mail::sendmail

2002-09-29 Thread Edgington, Jeff
Title: Message



you can take 
a look at what I'm using... not sure if it'll help you much.

use 
Mail::Sendmail;

#---# Email information#---$to_address = '[EMAIL PROTECTED]'; 
$from_address 
= '[EMAIL PROTECTED]';$smtp_server 
= 'smtp.umr.edu';


$subject = 
"Moving $userid";$message = "Moving $userid to 
$target\n";send_msg($subject, $message);

#---# 
Send Message#---sub send_msg{ my($sub, $msg) = 
@_; %mail_error = ( To = 
$to_address,From 
= $from_address, 
Smtp = 
$smtp_server, 
Subject = 
$sub, Message 
= $msg); sendmail(%mail_error) or die 
$Mail::Sendmail::error;}



  
  -Original Message-From: Issa Mbodji 
  [mailto:[EMAIL PROTECTED]] Sent: Sunday, September 29, 2002 7:20 
  PMTo: [EMAIL PROTECTED]Cc: 
  [EMAIL PROTECTED]Subject: Emailing using 
  Mail::sendmail
  Hello:
  I have tried to email using Mail::Sendmail, but I get the following error 
  message whenI testthe program using the command prompt:
  "sendmail failure sending email: bad file descriptor"
  And here is the program I am testing:
  ===
  # ! C:\indigoperl\bin\perl.exe
  print "Content-type:text/html\n\n";
  read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});@pairs = split(//, 
  $buffer);foreach $pair (@pairs) { ($name, $value) = 
  split(/=/, $pair); $value =~ tr/+/ 
  /; $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", 
  hex($1))/eg; $FORM{$name} = $value;}$mailprog = 
  'C:\indigoperl\site\lib\mail'; #(Here is exactly where I have the send 
  mail)
  $recipient = '[EMAIL PROTECTED]' ;
  open (MAIL, "|$mailprog -t") or dienice("Can't access 
  $mailprog!\n");
  print MAIL "To: $recipient\n";
  print MAIL "Reply-to: $FORM{'email'} ($FORM{'name'})\n";
  print MAIL "Subject: Form Data\n\n";
  foreach $key (keys(%FORM)) { print MAIL "$key = 
  $FORM{$key}\n";}
  close(MAIL);
  print EndHTML;h2Thank You/h2Thank you 
  for writing. Your mail has been delivered.pReturn to our 
  a href="index.html"home 
  page/a./body/htmlEndHTML
  sub dienice { ($errmsg) = @_; 
  print "h2Error/h2\n"; print 
  "$errmsgp\n"; print 
  "/body/html\n"; exit;}
  
  Any help would be greatly appreciated
  Mame MbodjiMame Issa Mbodji 3201 Weeping Willow Ct # 33 
  Silver Spring, MD , 20906 Tel. (301) 603-0847 e-mail: 
  [EMAIL PROTECTED]
  
  
  Do you Yahoo!?New DSL Internet 
  Access from SBC  Yahoo!


RE: Dave Roth's web site

2002-09-18 Thread Edgington, Jeff

ppm install http://www.roth.net/perl/packages/win32-daemon.ppd



-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] 
Sent: Wednesday, September 18, 2002 2:39 PM
To: [EMAIL PROTECTED];
[EMAIL PROTECTED];
[EMAIL PROTECTED]
Subject: Dave Roth's web site


Does anybody know Dave's web?

I want to download daemon.pm on his web.

Thanks a lot in advance!

Lixin
___
Perl-Win32-Admin 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: make perl script 'hidden'

2002-09-08 Thread Edgington, Jeff

hrm... I _think_ that instead of issuing 'perl script.pl' you would
invoke 'wperl script.pl'

jeff e.



-Original Message-
From: TC Winquist [mailto:[EMAIL PROTECTED]] 
Sent: Sunday, September 08, 2002 9:17 AM
To: [EMAIL PROTECTED]
Subject: make perl script 'hidden'


I have a scheduled task on my win95 and win2k machines that executes a
perl
script every 5 minutes.  This means that every 5 minutes a command
prompt
pops up on the screen and then goes away when the script execution is
complete.  I don't want to rewrite the whole script, but is there a way
to
make the perl script so that it executes 'behind the scenes'?  In other
words, the script will still be executed every 5 minutes, but that
annoying
command prompt won't pop up every 5 minutes.  I think I've seen posts
about
this in the past but I didn't need it at the time.  Any help is greatly
appreciated!

Tim

___
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: How to Setup and Run Perl Script as Service in windows 2000?

2002-09-07 Thread Edgington, Jeff

win32::Daemon... I think this is far superior to srvany but if you
insist on using a method similar to below, the win2k resource kit has
what you are looking for (instsrv.exe I believe).



-Original Message-
From: Jitendra Soam [mailto:[EMAIL PROTECTED]] 
Sent: Saturday, September 07, 2002 8:26 AM
To: [EMAIL PROTECTED]
Subject: RE: How to Setup and Run Perl Script as Service in windows
2000?


Thanks for your help.

I believe these two files works with NT 4.0 and there is some other way
in windows 2000.  Following are the two FAQ from Active state:

How do I run a Perl script as a Windows NT Service?
You can run your Perl scripts as Windows NT Services via a program
called srvany.exe, which comes with the Windows NT Resource Kit. Once
srvany.exe is installed, read the srvany.wri file which should be with
it. This document will explain how to set up registry entries for your
new service.

After you are set up, to run your script as a service do:

  x:srvany perl script.pl

How do I run a Perl script as a Windows 2000 Service?

You can run your Perl scripts as Windows 2000 Services by accessing the
Microsoft Management Console. The Windows 2000 help files contain plenty
of information on how to start the MMC and how you can use it for Perl
scripts. 

I am not getting the second one right...

Can you help?

-Original Message-
From: Oliver Manickum [mailto:[EMAIL PROTECTED]] 
Sent: Saturday, September 07, 2002 6:07 PM
To: Jitendra Soam; [EMAIL PROTECTED]
Subject: RE: How to Setup and Run Perl Script as Service in windows
2000?


Hey There,

I am not sure how to do it with Perl itself (maybe the
Win32::AdminMisc), but the Windows Resource KIT comes with INSTSRV.EXE
and SRVANY.EXE, those two files allows a user to make any application
run as a service on the machine.


Contact me directly if you need step by step instructions :)

- Olly


-Original Message-
From: Jitendra Soam [mailto:[EMAIL PROTECTED]] 
Sent: 07 September 2002 01:45
To: [EMAIL PROTECTED]
Subject: How to Setup and Run Perl Script as Service in windows 2000?


Thanks
___
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
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs