Mike, et al;
Thanks for all your help and special thanks to Bill for helping
me offline. I've got exactly what I want here in this small
example using CVS.
Cheers,
Carter.
=-=-=-=-=-= Code =-=-=-=-=-=
use strict;
use POSIX ":sys_wait_h";
$| = 1; # Important to turn off autoflush.
my $pid
wxPerl is also a solid option. If your only developing for Windows, then
win32::GUI is an option too - though in my past experience, wxPerl is the
better of the GUI options out there (not to create a flame - just mho).
- Original Message -
From: "Wong, Danny H." <[EMAIL PROTECTED]>
To:
I've written a script in which I'm doing wmi calls via OLE.
Is there any OLE cleanup I should be doing prior to leaving the subroutine?
Thanks.
my ($sysname) = @_;
my ($WMI,$class, $OSdata, $item);
eval
{
$class = "WinMgmts:{impersonationLevel=impersonate}!//$sysname";
unless ($W
Juan Carlos Cruz Dada wrote:
>
> Thanks Rob,
>
> I think this will do it.
>
> David,
>
> I can't give you a real example as I'm in the process of developing a new
> protocol, keeping with the post yo answered me on 10/03/2004. I do want the
> lenght, not the string. when I have the working proto
Hi All,
Here is what I am trying to do. I have a perl script that checks
for a users input. If the user enters the wrong value, I want to pop up
a input/text dialog for the user to enter the right information. Any
suggestions on what to use? Is tk the only option?
Thanks
Danny Wong
SCM Eng
Thank you for the info received to date.
I would like to be deleted from this listing. Its just too much
Thank you in anticipation
Regards [EMAIL PROTECTED]
Thanks you.
Romain DJEKOURI___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubsc
the below is created as an example and hasn't been tested - you will need to fill in
some code where I've typed things similar to
a_descriptive_function_name_for_what_happens_here();
the perlipc and perlfork manpages have some good examples :)
hope it helps
#!/usr/bin/perl
# perl fork/waitpid exa
Thanks Rob,
I think this will do it.
David,
I can't give you a real example as I'm in the process of developing a new
protocol, keeping with the post yo answered me on 10/03/2004. I do want the
lenght, not the string. when I have the working protocol, I'll be glad to
share it with you guys.
reg
If you are having trouble with the opendir() command, it may be your linux
kernal. I ran into a similar problem after converting to mod_perl. Here is
the hack I used to fix it that runs in Perl. Mike
$directory = $directory . "*";
@files = <${directory}>;
chop $directory;
Mario,
Try this change:
@filelist = `grep (!/^[.c]/, (grep "$dir/$_", readdir(SQLDIR)))`;
The ` will cause the grep command to be executed in the Unix environment
instead of perl.
Eugene P. Watts
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of
Mario Orti
Rob, Bill:
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
cheers, JeffG
rob wrote:
Thank you for the info received to date.
I would like to be deleted from this listing. Its just too much
Thank you in anticipation
Regards Rob Kelley [EMAIL PROTECTED]
-
Thanks, Tony.
I'm using 5.6.1 primarily on Solaris, however the work that I'm
doing should eventually end up in a Perl Module that I will use
on Win32 platforms and Unix platforms. I understand that
Win32::Process will handle this on Win32 platforms but that doesn't
much help me with Unix imple
[EMAIL PROTECTED] wrote:
> Greetings perlers,
>
> new PSQ for you, so please bear with me. I'd like to convert the
> lenght of a string into 3 Hex Values, eg.
> if length($str) == 5 it would print 00 00 05
>
You can use sprintf and %x along with a size, though I am thinking you want it
Juan Carlos Cruz Dada wrote:
>
> new PSQ for you, so please bear with me. I'd like to convert the lenght of a
> string into 3 Hex Values, eg.
> if length($str) == 5 it would print 00 00 05
>
> the only way I think of doing this is modding or dividing by 255 to get the
> values... any ideas?
Hi.
Greetings perlers,
new PSQ for you, so please bear with me. I'd like to convert the lenght of a
string into 3 Hex Values, eg.
if length($str) == 5 it would print 00 00 05
the only way I think of doing this is modding or dividing by 255 to get the
values... any ideas?
thanks in advanced,
regards
Title: Please remove me from this mail list
All,
I’ve appreciated seeing what some actual perl-related issues developers have, but I’m transitioning to a new position.
Regards,
*bill
Bill Bostic
Today's mighty oak is just yesterday's nut that held its ground
_
What version of Perl are you using? If you're using 5.8.0 or above, fork() works like
the threads pragma does. Take a look at perlfork and/or the threads and
threads::shared Pragmas. Oh yeah, and especially perlthrtut and perlothrtut. All
these can be found in the ActivePerl User Guide. The
Thank you for the info received to date.
I would like to be deleted from this listing. Its just too
much
Thank you in anticipation
Regards Rob Kelley [EMAIL PROTECTED]
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubs
John Moon wrote:
>
> I'm not sure what you are trying to do with
>
> @filelist = grep (!/^[.c]/, (grep "$dir/$_", readdir(SQLDIR)));
>
> but if you are trying to pretend the $dir onto the filename it is not
> working. Try :
>
>
> @filelist = map {"$dir/$_"} grep !/^[.c]/, readdir SQLDIR;
>
Hi Mario.
See my answers in-line.
Mario Ortiz wrote:
>
> I have been working on this code for a few days and can not see where I
> have gone wrong. Maybe you experts can show me the way.
> I am having problems with the foreach statement. I need some direction
> so I may move on in peace.
> My in
20 matches
Mail list logo