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: Win32
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 c:\temp\stats.tx
Being new to Perl, Im 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 l
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
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 (Win32::Shell::Execute("ope
# 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
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 t
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 wo
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
re-instanti
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 rele
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
The time function also give you seconds since the epoch, so you just
subtract the two and see if it's less that 600 (600 seconds = 10 minutes)
if ( &time - $ftp->mdtm($file) < 600 ) {
transfer file
}
-Original Message-
From: Res Batamula [mailto:[EMAIL PROTECTED]]
Sent: Wednesday
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 d
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 to
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 $pagec
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
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.
__
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
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 t
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', $_] } sp
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 in
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 us
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 = n
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 Team,DC=cor
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
25 matches
Mail list logo
