RE: Compare help please...

2002-07-12 Thread Rubinow, Larry
steve silvers wrote: I'm having a heck of a time getting this to work. Hopefully there is an easy fix to this :-). I have two arrays below with dates. Just the day. @numbers is the dates I want to match. @numbers2 is the dates I want to match against @numbers Sounds easy but no such

RE: PerLDAP and ADSI

2002-07-12 Thread Bullock, Howard A.
I did not see this get posted so I am resending. I'm working a little dilemma here. We have a Win2K Domain that is in mixed mode (it can server both NT and 2K machines). I have a userid (i.e. mydomain\username) and I'm trying to search the AD to get the full DN (CN=username,OU=Lan

RE: OLE module info please

2002-07-12 Thread Michael D. Smith
This page from the Win32 Perl book http://www.mmg.vmei.acad.bg/perl/learn32/ch19_02.htm Says, I should use OLE; (with the AS distribution) instead of: use Win32::OLE; I've tried both and either seems to work with this line (which isn't exactly the same as the book's example): $WshShell =

Use a module from a user param input

2002-07-12 Thread Fernando Freire Baez \[Medicare\)
Hello, I am working in an intranet site that create the pages on the fly. All the information about the site (ej: scripts, comands, views, etc) is stored in MySQL database. I am using the MVC (Model, View, Controler) pattern style, but I want to call the modules to use in the scripts from the

RE: Use a module from a user param input

2002-07-12 Thread Burak Gürsoy
you cant do that. try require() instead -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of Fernando Freire Baez [Medicare) Sent: Friday, July 12, 2002 8:24 PM To: [EMAIL PROTECTED] Subject: Use a module from a user param input Hello, I am working in an

RE: Compare help please...

2002-07-12 Thread Bro Ji
For example : my $numbers = 090105202328191420; my $numbers2 = 0918272830|0928061214; my %counts = (); $counts{$_}++ foreach unpack +('a2' x int(length($numbers)/2)), $numbers; # or your $counts{$_}++ foreach @numbers; if @numbers *IS* an array for ( (map {[ unpack 'a2a2a2a2a2', $_] } split

PPM Help!

2002-07-12 Thread Manesh Manickam
PPM interactive shell (2.1.6) - type 'help' for available commands. PPM install dbi-1.13 Install package 'dbi-1.13?' (y/N): y Installing package 'dbi-1.13'... Error installing package 'dbi-1.13': Could not locate a PPD file for package dbi-1.13 PPM Please tell me why! I have

RE: PPM Help!

2002-07-12 Thread Scott Campbell
Have you tried just installing DBI at the PPM prompt? Scott Campbell Senior Software Developer Somix Technologies (207) 324-8805 http://www.somix.com -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] On Behalf Of Manesh Manickam Sent: Friday, July

Submit post from a Perl script.

2002-07-12 Thread steve silvers
I asked this question a little bit back, and Bill responded with install Net::SSL and IO::Socket::SSL Are these modules made for Windows, or just unix/linux. I'm running on Windows 2000 Adv Server. If these won't work on Windows, is there another way to do this. Thank you. Steve.

if statement does not work, help please

2002-07-12 Thread Malcolm Debono
Can someone tell me why the 'if statement' below will not work. What I am trying to achieve is if the $pagecontent = then call sub routine no_tags. (If it is reading something in the variable $meta could someone please explain?) Thanks in advance Malcolm #!C:\Perl\bin\perl use CGI; # Use

RE: if statement does not work, help please

2002-07-12 Thread Morse, Richard E.
Malcolm Debono [mailto:[EMAIL PROTECTED]] wrote: #!C:\Perl\bin\perl use CGI; # Use the CGI.pm module use strict; use CGI qw/:standard/; my $q = new CGI; my $url = param('url'); my ($html,$meta,$lockit,$lines,$path_to_input_file,@metas,@lines); use LWP::Simple; my $pagecontent =

Re: Use a module from a user param input

2002-07-12 Thread John Deurbrouck
First, off, I wouldn't recommend doing that. You know that someone could invoke your cgi program with a bogus command line and then your script would abend, right? I'm just saying that in your example, you should definitely verify that the 'module' parameter was acceptable. A very quick fix is

Re: Submit post from a Perl script.

2002-07-12 Thread $Bill Luebkert
steve silvers wrote: I asked this question a little bit back, and Bill responded with install Net::SSL and IO::Socket::SSL Are these modules made for Windows, or just unix/linux. I'm running on Windows 2000 Adv Server. If these won't work on Windows, is there another way to do this.

Re: if statement does not work, help please

2002-07-12 Thread $Bill Luebkert
Malcolm Debono wrote: Can someone tell me why the 'if statement' below will not work. What I am trying to achieve is if the $pagecontent = then call sub routine no_tags. (If it is reading something in the variable $meta could someone please explain?) Thanks in advance Malcolm

another DBI upgrade problem

2002-07-12 Thread dorian
I recently upgraded DBI on our Windows 2000 server and got the following error message: DBI object version 1.14 does not match $DBI::VERSION 1.23 at E:/Perl/lib/DynaLoader.pm line 225. I see someone else had the same error from a post of June 4. My solution was to upgrade perl to the lest

Using Win32 Hooks with XS

2002-07-12 Thread Bjoern Hoehrmann
Hi, I have some XS code, that uses SetWindowsHookEx(...) to capture messages posted to a different thread. I got that running, but now I want to exchange information between the Callback procedure and the Perl module, that does not seem to work. I think the problem is, that the DLL is

Finding age of files

2002-07-12 Thread Craig, Brad \(London\)
Title: Finding age of files Hi All I need to process a list of files in a remote nt directory that are newer than a point in time. The way i've done that is to open the directory, then use the stat command to find the age in seconds of each file and compare with my point in time. I used

creating array reference to one array of a hash of arrays

2002-07-12 Thread Jares, Howard M
# I have a program that gets a hash from an API call. # the format of the hash is that each key corresponds to an # array. The following code snippet illustrates the data: $href-{One} = [1,2,3,4]; print ref($href).\n; print ref($href-{One}).\n; # I would like to simplify the syntax to use a

Re: All possible Win32 system commands WAS Starting other programs

2002-07-12 Thread Martin Moss
Sorry if this is a bit way off the track, I've missed the first half of the posts, a while back I was trying to open a URL in the default browser from a perl script, I used a module called Win32::Shell::Execute I didn't look into how it worked but I just used this:- if

Extractive multiple rows from database

2002-07-12 Thread Allan
I have a quick question. Im calling out a bunch of rows from my table as. SELECT bla,bla,bla FROM table. #around 400 rows. while(($col1, $col2, $col3, etc) = $sth-fetchrow_array) { #The data im pulling is something like. first, last, email, address, city, state, zip, #I want to extract

event.pm and IO:sockets

2002-07-12 Thread Magnone, Angelo
Title: event.pm and IO:sockets Has anyone been able to successfully combine Events (event.pm) and IO::Socket. I can get my server started...connect to is using a client... communicate between the two... however, if I kill (ctrl-c) or exit my client... the server dies as well! Any help

mapping drive/creating home directories...

2002-07-12 Thread Jason Hemak
Being new to Perl, I’m curious as to what is considered the most “perlized” method for connecting to a share on a windows system and then being able to create directories and share those newly created directories. While I could imagine perl simply making use of “net use” and “net share” and the

cross referencing values in hashes....

2002-07-12 Thread Mike Brentlinger
hi all, ive long listened in on this list but rarely if ever posted, and must say its been very educational and helpful, so thanks. now for my question which is probably pretty simple, i just dont know how to go about it. anyway heres the deal. i have 2 files one lets call one

RE: Win32::GuiTest SendKeys delay

2002-07-12 Thread Fernando Madruga
I tried on Windows XP Professional with ActivePerl 5.6.1.633 and it dit NOT work HTH, Fernando Madruga -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] On Behalf Of Jim Angstadt Sent: quinta-feira, 11 de Julho de 2002 16:37 To: [EMAIL PROTECTED] Subject: Re: