Re: time manipulation

2006-10-27 Thread $Bill Luebkert
Alejandro Santillan wrote: > I would like to know if there exists some module that is able con add and > substract times. > > For example, I want to see the time in seconds between the beginning and > ending of an application. > Something like this: > > $a="13:12:01"; > $b="13:02:01"; > > $c=$a

RE: time manipulation

2006-10-27 Thread Peter Eisengrein
> I would like to know if there exists some module that is able > con add and > substract times. > > For example, I want to see the time in seconds between the > beginning and > ending of an application. > Something like this: > > $a="13:12:01"; > $b="13:02:01"; > > $c=$a-$b; > > I would like

RE: OLE-object type cast

2006-10-27 Thread Jan Dubois
Hi Thomas,   Every COM object can only have a single IDispatch interface, regardless how many other interfaces it may support.  It is up to the implementer of the object to make sure all the functionality of the different VTBL interfaces is accessible to scripting languages through the ID

RE: OT -- Re: time manipulation

2006-10-27 Thread Erich Singer
Maybe Craig should even go back in time and recall what is an ethical reply to a question ;-) -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Craig Cardimon Sent: Friday, October 27, 2006 3:34 PM To: Alejandro Santillan Cc: perl-win32-users@listserv.A

OT -- Re: time manipulation

2006-10-27 Thread Craig Cardimon
Alejandro Santillan wrote: > I would like to know if there exists some module that is able con add and > substract times. > > For example, I want to see the time in seconds between the beginning and > ending of an application. > Something like this: > > $a="13:12:01"; > $b="13:02:01"; > > $c=$a-

time manipulation

2006-10-27 Thread Alejandro Santillan
I would like to know if there exists some module that is able con add and substract times. For example, I want to see the time in seconds between the beginning and ending of an application. Something like this: $a="13:12:01"; $b="13:02:01"; $c=$a-$b; I would like $c to be 00:10:00, or 600 secs.

Re: sharing access to a socket

2006-10-27 Thread Daniel McBrearty
that looks pretty interesting. I'll probably take the easy way out for this project, but I'll bookmark that for later ... thanks. > > Daniel - you really should take a look at POE (http://poe.perl.org/) > -- Daniel McBrearty email : danielmcbrearty at gmail.com www.engoi.com : the multi - langu

Re: sharing access to a socket

2006-10-27 Thread Daniel McBrearty
if you take out the "chatter" part, it works perfectly. You can run the program, do "telnet localhost 1000", and it will echo each line you send back at you. That part has been OK for weeks, until I tried to add this reporter function. It's like a file - readline on $SOCK to get a line, writeline t

OLE-object type cast

2006-10-27 Thread Thomas . Bruns
Hi, in a project we want to use the DCOM-API of a Win98-based measurement instrument. We need to access different so called Inputs which have some common settings but also some individual settings. This is mapped to the API by creating a Class "IInput" (which is IDispatch type according to OLEVie

Re: sharing access to a socket

2006-10-27 Thread Chris Wagner
That code doesn't really make sense. It looks like ur trying to talk to urself on the same port?? Make a seperate script that listens on a port and just prints whatever it gets to the screen. Then have ur threaded app do the talking in a threaded environment. And ur never putting anything in th

Re: Wrapper-initiated app doesn't return control

2006-10-27 Thread Dennis Daupert
Egg on face. I had changed directory and didn't know it, so the path to my key was wrong (sigh) I still do have the same question, tho, in case of future need. Is there a way to suppress popups for apps that need to run unattended (after we've determined the popup is not really useful, unlike

Re: Wrapper-initiated app doesn't return control

2006-10-27 Thread Dennis Daupert
>> pageant starts, but doesn't return control to my wrapper; Glenn Linderman gave this wisdom: > augment $pageant_cmd as > my $pageant_cmd = qq#start "pageant" pageant $the->{keypath}/$the->{private_key}#; That fixes the 'return control' issue, thank you very much, Glenn! Now another proble

RE: sharing access to a socket

2006-10-27 Thread Tobias Hoellrich
> -Original Message- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED] On > Behalf Of Daniel McBrearty > Sent: Friday, October 27, 2006 6:17 AM > To: $Bill Luebkert > Cc: perl-win32-users@listserv.ActiveState.com > Subject: Re: sharing access to a socket > > thanks Bill. but why is i

Re: sharing access to a socket

2006-10-27 Thread $Bill Luebkert
Daniel McBrearty wrote: > thanks Bill. but why is it so inadvisable? I don't get it. I'd have > thought that some app where you want one task to execute periodically > while another responds to user input was exactly where you should use > threads. (I'll look into your suggestions though.) I agre

Re: Logger::Simple Deep Recursion Error

2006-10-27 Thread Sisyphus
- Original Message - From: "Michael Papet" <[EMAIL PROTECTED]> To: Sent: Friday, October 27, 2006 3:57 AM Subject: Logger::Simple Deep Recursion Error > Hi, > > I'm trying to use Logger::Simple in my program with an > empty log file. When I go to nmake test I get the > following error

Re: sharing access to a socket

2006-10-27 Thread Daniel McBrearty
thanks Bill. but why is it so inadvisable? I don't get it. I'd have thought that some app where you want one task to execute periodically while another responds to user input was exactly where you should use threads. (I'll look into your suggestions though.) It seems to be some weirdness in dealin

Re: sharing access to a socket

2006-10-27 Thread $Bill Luebkert
Daniel McBrearty wrote: > Now I want to run a thread inside this app that sends back info > regularly. It needs to run in a seperate thread, and be startable and > stoppable, which I have working. I don't care if the responses from > the main thread and the reporter thread lines are mixed up ... i

Re: sharing access to a socket

2006-10-27 Thread Daniel McBrearty
Thanks guys. I like the look of Chris's queue idea, so I tried it ... but still no joy. Here's the test code. did I screw up ... ? i'll post this over at perl monks too as I saw some related discussion there. regards Daniel == use strict; use warnings; use threads; use Thread::Queue;

Re: help with sockets

2006-10-27 Thread Chris Wagner
At 12:53 PM 10/26/2006 -0300, Alejandro Santillan wrote: >Thanks Rob. I think that my problem is just the terminator character, but on >the string sent by the server, and not mine. U should be able to manually telnet to the port and do the transaction by just typing/pasting the string. Does that

Re: sharing access to a socket

2006-10-27 Thread Chris Wagner
At 11:59 AM 10/27/2006 +0200, Daniel McBrearty wrote: >Now I want to run a thread inside this app that sends back info >regularly. It needs to run in a seperate thread, and be startable and >stoppable, which I have working. I don't care if the responses from >the main thread and the reporter thread

AW: sharing access to a socket

2006-10-27 Thread Dietmar Fiehn, Dr.
Hi Daniel, in theory you need not share the $SOCK, you can just use it in your threads, if you have declared it before starting them. However, this does not work on windows (at least in my experiments) with IO::Socket. You have to dig out the plain sockets, which work (with some caveats) in a th

Re: sharing access to a socket

2006-10-27 Thread Daniel McBrearty
BTW, what i get before I do teh "shared" thing is that the reports are getting back, but not on time, in a seemingly random way as I type characters on teh client side. I tried adding $SOCK->flush; to sockout() but that doesn't help. On 10/27/06, Daniel McBrearty <[EMAIL PROTECTED]> wrote: > Hi >

sharing access to a socket

2006-10-27 Thread Daniel McBrearty
Hi I have an app I'm writing which runs as a background process, communicating with the main app over a localhost socket. It's a little server. the basic code looks like this: my $SOCK; my $sock = new IO::Socket::INET $SOCK = $sock.accept(); while (1) { my $line; while ($line = <$S