RE: returning values/information from perl apps to php apps..

2004-10-04 Thread Eric Germann
It can flatten a perl data structure into an ASCII representation that can be passed to a PHP app and reinflated into a PHP structure. Vice versa works also. How you pass the information between apps is up to you. It can be a file, a db field or an instant message. We've used all three. Eric

RE: returning values/information from perl apps to php apps..

2004-10-04 Thread bruce
eric... how does using serialize allow the information from the perl app to be used by the php parent app. unless you're implying that the serialized information is stored in an external file, that's then read by the php calling/parent app... -bruce -Original Message- From: [EMAIL PROTE

RE: returning values/information from perl apps to php apps..

2004-10-04 Thread Eric Germann
Php::serialize -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of bruce Sent: Monday, October 04, 2004 9:55 PM To: [EMAIL PROTECTED] Cc: [EMAIL PROTECTED] Subject: returning values/information from perl apps to php apps.. hi... i'm trying to return values/

Re: returning values/information from perl apps to php apps..

2004-10-04 Thread Randy J. Ray
the issue i'm having is that perl only seems to allow an app to have an 'exit' value of a short int. i need to return values that might be multiple arrarys. should i simply write the perl return values into an output file, and read the output vars from the output file in the php file... I believe t

returning values/information from perl apps to php apps..

2004-10-04 Thread bruce
hi... i'm trying to return values/information from a perl app to a php app. what's the best way?? foo.php blah res = system(dog.pl) . . --- dog.pl $vars . . . -- the issue i'm having is that perl only seems to allow an app to have an 'exit' value of a short in

Re: Find file size, and version

2004-10-04 Thread $Bill Luebkert
[EMAIL PROTECTED] wrote: > My script below works fine, but I need to grab the file > version also. > > Thank you > Allan > > #!/Perl > > use File::Find; > my $ByteCount=0; > > find(\&files, "//COMPNAME/c\$/Program Files/Common > Files/Microsoft Shared/Office10/mso.dll"); > print "Files are us

RE : Find file size, and version

2004-10-04 Thread David Liouville
Use something like this : (you probably doesn't need all fonctionnality) # Nom de la fonction : GetExeInfo # # Date de création : 09/07/2003 # Date de dernière révision : 21/08/2003 # # Auteur(s) : David Liouville ([EMAIL PROTECTED]) # # Description : Extrait des fichiers executables les informati

winmgmts and perl

2004-10-04 Thread Adam R. Frielink
I am trying to install a 'print-to-file' printer using an OLE interface. The commented code below is an example VB script that I seem not to be able to duplicate in perl. Can anyone see my problem? ___Begin___ #Set objWMIService = GetObject("winmgmts:") #Set objDriver = objWMIService.Get("Win32

Find file size, and version

2004-10-04 Thread barons
My script below works fine, but I need to grab the file version also. Thank you Allan #!/Perl use File::Find; my $ByteCount=0; find(\&files, "//COMPNAME/c\$/Program Files/Common Files/Microsoft Shared/Office10/mso.dll"); print "Files are using $ByteCount bytes\n"; print "I NEED THE VERSION";

CRC computing flow exit for Invalid compressed data

2004-10-04 Thread Jutu Subramanian, Srinivasan (Cognizant)
In the CRCComputingFileHandle.pm, sub getCRCValue { foreach my $member ($zip->members()) { my $compressedSize = $member->compressedSize(); $status = $member->extractToFileHandle($fh); This part### } } For the above coding, If the zip f

Re: External dat file question.

2004-10-04 Thread Trevor Joerges [SendMIME Software]
> This is probably a simple question, but i'm asking for some > help as to the best way to > accomplish this. My script reads data from my database and > one of the columns is the user id. > This script is run once every hour by a cron job. I want to > grab all the user id's each hour and > keep a

Re: External dat file question.

2004-10-04 Thread gerhard . petrowitsch
Hi Allan, if you don't mind the user IDs appearing in a different order each time you call the script, a hash is a very good choice. You could populate your hash with the currently logged in users like foreach ( &getUsers ) { $userHash{$_} = 1; } Then you could read the file line be line a

FW: Re: External dat file question.

2004-10-04 Thread Friedel . Wittrock
I would use a hash: snippet %ID = (); open(FILE, "users.dat") || die "Can't open users.dat: $^E"; while () { chomp; my($uid, $value) = split /=/, $_; $ID{$uid} = $value; } close(FILE); while (($field1, $field2, $userid) = $sth->fetchrow_array) { #

External dat file question.

2004-10-04 Thread barons
This is probably a simple question, but i'm asking for some help as to the best way to accomplish this. My script reads data from my database and one of the columns is the user id. This script is run once every hour by a cron job. I want to grab all the user id's each hour and keep a count going.

close SFTP in perl

2004-10-04 Thread Jutu Subramanian, Srinivasan (Cognizant)
Hi, How to close the SFTP Connection in perl? I have several environment like E1,E2 and E3. If I open the connection individually, I need to close the connection individually after the work. How to handle the close SFTP in perl. If anybody knows, Kindly inform me. regards Srinivas This e-mail