RE: rsync for Win32
This would be rsync over FTP not the standard rysnc over SSH to interface the ActiveState repository. Did you make any changes for this difference? -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Sisyphus Sent: Monday, March 10, 2008 9:05 AM To: 'perl-win32-users' Subject: rsync for Win32 Hi, On the face of it, the topic of this post has little (if anything) to do with perl. But, afaict from 'perldoc perlhack', if I want to stay in touch with the current perl developments I need to be able to download the latest source by running: rsync -avz rsync://public.activestate.com/perl-current/ Only problem is .. I'm having trouble finding a Windows version of 'rsync' that's capable of succesfully running that command. Any advice ? I've asked about this on both perlmonks and the cygwin mailing list ... perhaps a solution will turn up in (at least) one of those places, though it has not so far. I couldn't find a Cygwin version of rsync under Cygwin's Setup.exe (though it wouldn't surprise me if such a beast existred) and the 2 windows executables that I've tried (rsync-wrap.exe and rsync.exe both croak on the command). Cheers, Rob ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: PGP
Yeah, thanks for confirming GnuPGP. Looks like the way to got (free). I am little concerned about the stability of Cygwin/GnuPGP on Windows 2003; anyone else doing it? Might do this part (PGP) on Linux or Solaris... -Original Message- From: Singer, Erich [mailto:[EMAIL PROTECTED] Sent: Tuesday, March 04, 2008 12:03 PM To: Bharucha, Nikhil; perl-win32-users@listserv.activestate.com Subject: RE: PGP Hello GnuPGP HTH Erich From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Bharucha, Nikhil Sent: Tuesday, March 04, 2008 10:44 AM To: perl-win32-users@listserv.activestate.com Subject: PGP Hi All, Any recomendations for PGP? I may need to encrypt/decrypt on a windows server. Thanks, Nick This email is intended for the recipient only. If you are not the intended recipient please disregard, and do not use the information for any purpose. This email is intended for the recipient only. If you are not the intended recipient please disregard, and do not use the information for any purpose. ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
PGP
Hi All, Any recomendations for PGP? I may need to encrypt/decrypt on a windows server. Thanks, Nick This email is intended for the recipient only. If you are not the intended recipient please disregard, and do not use the information for any purpose. ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: 2008 Winter Scripting Games have begun
Exactly, MS aint stupid. Perl on Windows via ActiveState is stable and relatively straightforward and of course powerful. Perl aint going nowhere. The need for a "scripting language" will never go away. Large applications will always need "bridge" programs etc. Additionally, many companies are recognizing the power/code reuse/better code documentation aspects of using OO Perl. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Angelos Karageorgiou Sent: Monday, February 18, 2008 5:10 AM To: Foo JH Cc: Jan Dubois; [EMAIL PROTECTED]; perl-win32-users@listserv.ActiveState.com Subject: Re: 2008 Winter Scripting Games have begun Foo JH wrote: > I guess they're trying to get some inspiration from the Perl libraries/ > syntax for their next-gen scripting language? > > P#? PowerPerl? > Foo JH wrote: > I guess they're trying to get some inspiration from the Perl libraries/ > syntax for their next-gen scripting language? > > P#? PowerPerl? > > Nah, they know what a powerful scripting engine Perl is and they are trying to show that they do care about the existing smart technology. Of course they will try to push their tech, but Perl is active and working Now. Like it was when IIS first came out and that miserable server took a bite out of the market when PERL was ported to windows ! I took a quick look at powershell and it turned my stomach. maybe I am an old dog unable to learn new tricks like python and such, but powershell I really did not like, maybe given enough time... ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs This email is intended for the recipient only. If you are not the intended recipient please disregard, and do not use the information for any purpose. ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: how to make it to run faster
I believe the pack function is implemented in C so I don't know how much faster you can write it... -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Su, Yu (Eugene) Sent: Tuesday, March 13, 2007 3:14 PM To: Perl-Win32-Users@listserv.ActiveState.com Subject: RE: how to make it to run faster Hi all, I wrote a script to update a binary data file. The file is a 2048x2048 unsigned-short array encoded in little-endian + 8K header. All values should be even. However, there are some data corrupted with odd values. The task is to set all odd numbers to 1. I wrote a simple script which did the job, but it was too slow. It took over 40 seconds on my 5 year old PC. I wonder if there is better way to make it run faster. Thanks for help. -Eugene code snippet # use strict; use warnings; my $header; my $header_size=8*1024; my $body; my $body_size=2048*2048*2; my $image=$ARGV[0]; open(FH, "+<$image") or die "\nCan not open $image for updating: $!\n"; read(FH, $header, $header_size) == $header_size or print "\nshort read: $!\n"; read(FH, $body, $body_size) == $body_size or print "\nshort read: $!\n"; my $body_new; my $p; foreach $p (unpack("S*",$body)) { if ($p&1) {$p=1}; $body_new=$body_new.pack("S",$p); # packing is slow ~40 seconds } seek FH, 0, 0; print FH $header, $body_new; close(FH); ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Resolved - Question about Win32::OLE
Take a look at the API doc for whatever SFTP program you are accessing; it may be returning values you are not expecting. After you instantiate via the new method in OLE you are passed back whatever the external program passes back. It could be passing back 0 upon success which will cause die to work azz-backwards. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Sent: Thursday, May 25, 2006 9:23 AM To: [EMAIL PROTECTED]; Bharucha, Nikhil; [EMAIL PROTECTED]; [EMAIL PROTECTED] Cc: perl-win32-users@listserv.ActiveState.com Subject: Resolved - Question about Win32::OLE First, thanks to all who offered their assistance. I spent many hours trying to make my simple test script work...and it does (did)! Darn thing had been working all the time (very embarassing). The problem seems to be die or warn in this line: $SFTPServer->connect( $Server, $Port, $UserName, $Password ) or die "Could not connect as $UserName to $Server:$Port!"; This line does not cause the error message. $SFTPServer->connect( $Server, $Port, $UserName, $Password ); Apparently, both versions were actually making a connection while I thought it was failing because of the message. I'm guessing that die/warn should not be used with win32::OLE. LastError seems the correct construct. Again, thanks to all Sturdy ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Question about Win32-OLE
I would place SFTPCOMInterface.CIServer in single quotes and I would check your object reference $SFTPServer after "new" to make sure that it executed ok. Just some thoughts at the end of the day... Nick -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of [EMAIL PROTECTED] Sent: Wednesday, May 24, 2006 2:59 PM To: perl-win32-users@listserv.ActiveState.com Subject: Question about Win32-OLE This message is in MIME format. Since your mail reader does not understand this format, some or all of this message may not be legible. connect method refuses to establish the connection. use Win32::OLE; my $Server = "localhost"; my $Port = "1000"; my $UserName = "Admin"; my $Password = "Admin"; my $SFTPServer = Win32::OLE->new("SFTPCOMInterface.CIServer"); $SFTPServer->connect( $Server, $Port, $UserName, $Password ) or die "Could not connect as $UserName to $Server:$Port!"; The above simple script throws this error: Could not connect as Admin to localhost:1000! at C:\Source\SFTPTest.pl line 7. I feel the parameters are being accepted because if I change $UserName or $Password, then I get a msg that logon failed. These same parameters work in this VBS: Set SFTPServer = WScript.CreateObject("SFTPCOMInterface.CIServer") txtServer = "localhost" txtPort = "1000" txtUserName = "Admin" txtPassword = "Admin" SFTPServer.Connect txtServer, txtPort, txtUserName, txtPassword Does anyone have a clue as to what might be going wrong? There seems to be an issue with OLE itself but this is beyond me. Thanks again and best regards, Sturdy ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Re[2]: Does NET::SFTP work on Win32?
My investigation into this was about 3 years ago, maybe things have changed with later builds? -Original Message- From: Christopher Taranto [mailto:[EMAIL PROTECTED] Sent: Tuesday, May 16, 2006 8:00 PM To: Bharucha, Nikhil; [EMAIL PROTECTED] Cc: perl-win32-users@listserv.ActiveState.com Subject: Re[2]: Does NET::SFTP work on Win32? Tuesday, May 16, 2006, 12:44:00 PM, you wrote: BN> I have not found the build to be stable IMHO. On Unix, it works great. BN> I use the secure dev kit with WS_FTP. It costs a few bucks but it is BN> stable and object oriented which give you a lot of flexibility. BN> BN> Let me know if you get it working. Since my needs are for work I did BN> not feel comfortable relying upon it... BN> Nick RWS> From: [EMAIL PROTECTED] RWS> [mailto:[EMAIL PROTECTED] On Behalf Of RWS> [EMAIL PROTECTED] RWS> Sent: Tuesday, May 16, 2006 8:45 AM RWS> To: perl-win32-users@listserv.ActiveState.com RWS> Subject: Does NET::SFTP work on Win32? RWS> RWS> Hi all, RWS> RWS> I have a perl ftp client that connects to IIS and I need to update the RWS> client to use a secure means of transfer to a SSH/SSL server. All I need RWS> to do is open, login, send, get, and size for files on a remote box. I RWS> have net::sftp and net::ssh::win32 and other associated modules (5.6.1 RWS> from Soulcage.net) but there is also a lot of discussion on NG/lists BN> about it not working with Win32. I can change to perl 5.8 if necessary. BN> Can somebody give me a heads up if the ssh::Win32 module won't do the BN> job? Or if there is another way? Any hints for success would also be BN> appreciated. Thanks in advance. BN> I have not found the build to be stable IMHO. On Unix, it works great. BN> Let me know if you get it working. Since my needs are for work I did BN> not feel comfortable relying upon it... I use Net::SFTP on Win2K and XP with no issues. Try here: http://www.soulcage.net/ppds/ (Thanks, Rob!) RWS> to do is open, login, send, get, and size for files on a remote box. I Here is an example: use strict; use warnings; # these are the variables for SFTP my $hostname = 'HOSTNAME'; my %sftp_args = (user=> 'USERNAME', password=> 'PASSWORD', identity_files => '/directory/to/indentities', debug => 1); # note: directory needs an ending slash my %params= (local_directory => 'c:/local/directory/', remote_directory => '/remote/directory/' file_extension => 'ack'); my $sftp = Net::SFTP->new($hostname, %sftp_args) or die "Cannot connect to Host: [EMAIL PROTECTED]"; print "CONNECTED\n"; my @listings = $sftp->ls($params{remote_directory}); print "LISTINGS\n"; foreach (@listings) { my $listings = $_; my $filename = $listings->{filename}; # skip if not right file extension next if ($filename !~ /\.$params{file_extension}$/i); my $local_filepath = "$params{local_directory}$filename"; my $remote_filepath = "$params{remote_directory}$filename"; print "DO SOMETHING WITH: $filename\n"; # send # uncomment to: send local file to remote server # $sftp->put($local_filepath, $remote_filepath); # get/receive # uncomment to: retrieve remote file from server to local file # $sftp->get($remote_filepath, $local_filepath); } print "Done\n"; -- Best regards, Christophermailto:[EMAIL PROTECTED] ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Does NET::SFTP work on Win32?
I have not found the build to be stable IMHO. On Unix, it works great. I use the secure dev kit with WS_FTP. It costs a few bucks but it is stable and object oriented which give you a lot of flexibility. Let me know if you get it working. Since my needs are for work I did not feel comfortable relying upon it... Nick -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Timothy Johnson Sent: Tuesday, May 16, 2006 2:49 PM To: [EMAIL PROTECTED]; perl-win32-users@listserv.ActiveState.com Subject: RE: Does NET::SFTP work on Win32? This is a multi-part message in MIME format. unning on your Windows box first, but I haven't tried it. _ From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of [EMAIL PROTECTED] Sent: Tuesday, May 16, 2006 8:45 AM To: perl-win32-users@listserv.ActiveState.com Subject: Does NET::SFTP work on Win32? Hi all, I have a perl ftp client that connects to IIS and I need to update the client to use a secure means of transfer to a SSH/SSL server. All I need to do is open, login, send, get, and size for files on a remote box. I have net::sftp and net::ssh::win32 and other associated modules (5.6.1 from Soulcage.net) but there is also a lot of discussion on NG/lists about it not working with Win32. I can change to perl 5.8 if necessary. Can somebody give me a heads up if the ssh::Win32 module won't do the job? Or if there is another way? Any hints for success would also be appreciated. Thanks in advance. Sturdy ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Perl OO not looks like its mother
I have written OO Perl Modules for Win32 that I wouldn't even think of trying to do in something like PHP. They have been in Production for almost 2 years and are extremely robust. The OO implementation in Perl 5.x is a very straightforward logical one, and a joy to work with. This may be missed in the next generation of Perl (6)... Nick -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Jeff Griffiths Sent: Thursday, April 13, 2006 2:02 PM To: So Phal Cc: perl-win32-users@listserv.ActiveState.com Subject: Re: Perl OO not looks like its mother So Phal wrote: > HI, > > Perl OO seems not stamdard as C++/Java. For PHP the OO is very > similar to C++/JAva, so why many web programmer prefer PHP then Perl. > > > What do you think? Why should Perl have to be like C++ or Java? Also, I don't think PHP is a fair comparison. Decent OO support in PHP has arrived only very recently, and the previous implementation was really quite awful. I doubt that all the millions of PHP web programmers chose PHP 4 for its' OO support. My guess is that they chose PHP because it is web-centric, works a alot like javaScript, and is installed on nearly every web host on the planet. In other words, I'm betting it was a mix of pragmatic reasons and personal taste. cheers, JeffG ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: thread issue?
Are you releasing the threads when done with each? With Windows I believe the maximum concurrent thread count is 255. If not, please follow the standard operating procedure Bill has outlined below... -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of $Bill Luebkert Sent: Monday, October 24, 2005 4:43 PM To: LeFevre, Ken Cc: perl-win32-users@listserv.ActiveState.com Subject: Re: thread issue? LeFevre, Ken wrote: > I have a process that reads a snippet of code from a database and then > executes it using an eval. When I run it using my test tools, it works > great. When I run it as part of a system that spawns worker threads and > these threads do the eval, the same code fails. Here are my particulars: > > > * Windows 2K Professional Service Pack 4 (build 2195) > * perl 5.8.4 (build 810) > * If the code is just a single, in-line function, it works. If the > code contains function calls (to either internal or external > functions), it fails. > > Any ideas, suggestions, etc. would be greatly appreciated. The usual suggestion applies here - create the smallest possible snippet that demonstrates the problem showing input (if any), actual output/error indication and expected output. ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: How secure is Perl FTP function
This is of more concern than somebody getting the UID and Password from your exe on your server. I see the code below specifies binary, so the data is encrypted but the UID and Password you connect on is sent in text and anyone sniffing your connection can get it. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Steve Keith Sent: Monday, May 23, 2005 3:57 PM To: perl-win32-users@listserv.ActiveState.com Subject: Re: How secure is Perl FTP function Yes, you should consider anything that you put into the EXE file as not secure. Also, I believe any Net::FTP session sends the info in clear text. If you need to be secure, then you should use SSH instead of Net::FTP Steve >$ftp = Net::FTP->new("$ftp_server_name", Debug => 0) or die(""); #&server_error, , >$ftp->login("$ftp_user","$ftp_pass"); >$ftp->binary; >$ftp->put("$upload_filename"); >$ftp->quit; > > If I compile the code into an .exe file with ActiveState Perl, can an average hacker look at the machine code to get the username, password, and FTP address? ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: FTP modules
Common? I don't have it in my Perl? Just use Net::FTP, it is straightforward (read the doc) and good. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Kelly Stumbaugh Sent: Thursday, April 28, 2005 12:13 PM To: Perl-Win32-Users@listserv.ActiveState.com Subject: FTP modules Does anyone running Perl on Windows recommend a module for FTP? I have tried Net::FTP::Common, but I can't get it to work and there isn't much in the way of documentation. If you have some sample code that retrieves a file from an FTP site, it would be really helpful for me to see it. Thanks! ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: die() without setting $@
Is this for a script or an OO module? If it is for an OO module then your " aesthetically unpleasing" solution is probably the best. For a module you need to document these type of things so a future user can know how to handle... -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of John Deighan Sent: Tuesday, April 19, 2005 11:57 AM To: perl-win32-users@listserv.ActiveState.com Subject: die() without setting $@ I need to be able to jump to the end of the enclosing eval block, just like a die() does, but without setting [EMAIL PROTECTED] Is there a way to do that? (I've checked the Perl docs, but couldn't find it). I could possibly die() with a specific string, then use "if ($@ && ($@ ne ))" as the error trap, but that's aesthetically unpleasing. If you're interested in why, here's the explanation. Our web site is implemented via a series of "opcodes". The opcode is passed in the URL. There is a goto in our main script that dispatches to a particular opcode, and the code implementing the opcodes is surrounded by an eval block. When the output is generated, it's generated via a call to a library that outputs a page - usually using a template file. There is, however, also a function called errorPage() to which you pass a string. Now, when errorPage() is called, there has to be no further HTTP output, so I'd prefer, at the end of the errorPage() routine, to pass directly to the end of the eval block in the main code. die() does just that, but after the eval block, there's a "if ($@)" that handles any real errors, like database connection errors, direct calls to die(), etc., and I don't want calls to errorPage() to be treated like true errors (they're "user errors", which just means that we want to display a page to the user informing them of their error and how to correct it, and errorPage() does just that. Real errors result in us receiving an e-mail with the error message, and the error being logged to a database table). ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Inline::CPP
I am having good luck so far with Win32::OLE. As long as the DLL supports IDispatch (or Automation interfaces) it should work fine. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Sisyphus Sent: Friday, April 08, 2005 6:24 PM To: Lloyd Sartor Cc: perl-win32-users Subject: Re: Inline::CPP - Original Message - From: "Lloyd Sartor" <[EMAIL PROTECTED]> Cc: Sent: Saturday, April 09, 2005 1:00 AM Subject: Re: Inline::CPP > $Bill wrote on 04/08/2005 09:23:03 AM: > > > Sisyphus wrote: > > > > > Try cpan :-) > > > > > > As was mentioned a few days back, there might be problems with some > > > compilers on Win32 - but I thought we covered those issues. What's the > > > problem you've come up against ? > > > > If there were no problems, it would be available via PPM somewhere. :) > > That's correct - but those (2) problems were discussed a few days back in the thread 'More on Re: Windows DLL - Perl Interface' which op was following. > I need to link functions from a vendor's CPP source to a Perl program. > (Inline::C doesn't find the functions because of the name mangling.) The > ActiveState web site does not indicate that Inline::CPP is available for > Win32. Am I SOL? > Go to http://search.cpan.org/~neilw/Inline-CPP-0.25/ and click on the 'Download' link. Extract the downloaded file to some folder and cd to that folder. As was mentioned in a link provided in that other thread, starting at about line 44 of CPP.pm you have: #ifndef bool #include <%iostream%> #endif extern "C" { #include "EXTERN.h" #include "perl.h" Add "#include " to the top of that list - so it reads: #include #ifndef bool #include <%iostream%> #endif extern "C" { #include "EXTERN.h" #include "perl.h" Then run, in succession, perl makefile.pl nmake test nmake install The last test in the test suite will fail (with VC++ 6.0) - not sure why, but it probably won't lead to any problems for you. If it does, let us know. I assume you are using VC++ 6.0. Cheers, Rob ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: File creation date is not maintained when being replaced by adeleted file
I have found on Windows that only modification date is maintained well. Access date and creation date are not being maintained the way you would think/hope. If you can use modification date then you have a quick answer. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Fish, David Sent: Wednesday, April 06, 2005 8:25 AM To: perl-win32-users@listserv.ActiveState.com Subject: File creation date is not maintained when being replaced by adeleted file Hello Everyone! I am working on a Windows 2000 server where I have a Perl program that copies a file from one directory(lets call it test1) to another directory( let's call test2) as a different filename. Before the copy is done, the file is deleted in test2. The file in test1 is recreated nightly. The problem is the created date of the file in test1 does is inconsistently maintained in test2, where it should match what is in test1. The delete and copy is happening in the same script. I haven't been able to resolve this in an automated fashion, but if I manually delete the files via windows explorer then run the copy process that date carries over. I have tried using perl copy, windows copy/rename and UNIX cp/mv on this box and nothing seems to consistently work. Thanks, David E. Fish Property Operations Senior Analyst Marriott International, Inc (301) 380-3331 [EMAIL PROTECTED] This communication contains information from Marriott International, Inc. that may be confidential. Except for personal use by the intended recipient, or as expressly authorized by the sender, any person who receives this information is prohibited from disclosing, copying, distributing, and/or using it. If you have received this communication in error, please immediately delete it and all copies, and promptly notify the sender. Nothing in this communication is intended to operate as an electronic signature under applicable law. ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: More on Re: Windows DLL - Perl Interface
The Tech from IPSwitch says yes, they support the IDispatchc interface. Initial code seems to work fine as well, but I have not done too much yet. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Bharucha, Nikhil Sent: Monday, April 04, 2005 11:44 AM To: Jan Dubois Cc: Perl-Win32-Users@listserv.ActiveState.com Subject: RE: More on Re: Windows DLL - Perl Interface Update, the WS_FTP object model doesn't mention the IDispatch interface but I sent an email to a tech to answer. I guess I could put code together and see if it works but I would want to hear it from the WS_FTP folks that they, in fact, currently keep support up to date on this interface. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Bharucha, Nikhil Sent: Monday, April 04, 2005 11:33 AM To: Jan Dubois Cc: Perl-Win32-Users@listserv.ActiveState.com Subject: RE: More on Re: Windows DLL - Perl Interface Jan, I looked at OLE quickly before and I looked at it again -- see you worked on it too! I am trying to access the WS_FTP API. This is done by accessing the WsftpApi interface along with 5 other objects in a DLL. I do see in the notes that there is alpha support for this? Nick -Original Message- From: Jan Dubois [mailto:[EMAIL PROTECTED] Sent: Monday, April 04, 2005 11:09 AM To: Bharucha, Nikhil; Perl-Win32-Users@listserv.ActiveState.com Subject: RE: More on Re: Windows DLL - Perl Interface On Mon, 04 Apr 2005, Bharucha, Nikhil wrote: > Does anyone have any other ideas of attacking this problem of > accessing a COM object in a DLL from Win32 Perl? It depends on the COM object. If it implements IDispatch then you could use Win32::OLE to access it. Cheers, -Jan ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: More on Re: Windows DLL - Perl Interface
Update, the WS_FTP object model doesn't mention the IDispatch interface but I sent an email to a tech to answer. I guess I could put code together and see if it works but I would want to hear it from the WS_FTP folks that they, in fact, currently keep support up to date on this interface. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Bharucha, Nikhil Sent: Monday, April 04, 2005 11:33 AM To: Jan Dubois Cc: Perl-Win32-Users@listserv.ActiveState.com Subject: RE: More on Re: Windows DLL - Perl Interface Jan, I looked at OLE quickly before and I looked at it again -- see you worked on it too! I am trying to access the WS_FTP API. This is done by accessing the WsftpApi interface along with 5 other objects in a DLL. I do see in the notes that there is alpha support for this? Nick -Original Message- From: Jan Dubois [mailto:[EMAIL PROTECTED] Sent: Monday, April 04, 2005 11:09 AM To: Bharucha, Nikhil; Perl-Win32-Users@listserv.ActiveState.com Subject: RE: More on Re: Windows DLL - Perl Interface On Mon, 04 Apr 2005, Bharucha, Nikhil wrote: > Does anyone have any other ideas of attacking this problem of > accessing a COM object in a DLL from Win32 Perl? It depends on the COM object. If it implements IDispatch then you could use Win32::OLE to access it. Cheers, -Jan ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: More on Re: Windows DLL - Perl Interface
Jan, I looked at OLE quickly before and I looked at it again -- see you worked on it too! I am trying to access the WS_FTP API. This is done by accessing the WsftpApi interface along with 5 other objects in a DLL. I do see in the notes that there is alpha support for this? Nick -Original Message- From: Jan Dubois [mailto:[EMAIL PROTECTED] Sent: Monday, April 04, 2005 11:09 AM To: Bharucha, Nikhil; Perl-Win32-Users@listserv.ActiveState.com Subject: RE: More on Re: Windows DLL - Perl Interface On Mon, 04 Apr 2005, Bharucha, Nikhil wrote: > Does anyone have any other ideas of attacking this problem of > accessing a COM object in a DLL from Win32 Perl? It depends on the COM object. If it implements IDispatch then you could use Win32::OLE to access it. Cheers, -Jan ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: More on Re: Windows DLL - Perl Interface
Rob, Thanks for the input but I really need to stay with the Activestate release of Perl for standardization/stability reasons. The code I am writing is/will be a Perl module. I will be including this as a "black box" to many future Perl Win32 programs. Getting this PM to communicate with a DLL which must be accessed in an OO fashion is the problem. For Win32 I installed the inline package which has c but no cpp. Does anyone maintain the cpp for Win32? Even then I would need the C++ code to due the data type conversion and more. Does anyone have any other ideas of attacking this problem of accessing a COM object in a DLL from Win32 Perl? Thanks, Nick -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Sisyphus Sent: Thursday, March 31, 2005 8:21 PM To: Perl-Win32-Users@listserv.ActiveState.com Subject: Re: More on Re: Windows DLL - Perl Interface - Original Message - From: "Johan Lindström" <[EMAIL PROTECTED]> To: Sent: Friday, April 01, 2005 8:24 AM Subject: RE: More on Re: Windows DLL - Perl Interface > At 23:41 2005-03-31, Lloyd Sartor wrote: > >But if I needed a solution in a timely manner, I would concisely define > >what must be OO, and then probably attack it with Inline::C or Inline:C++. > >Win32::API certainly has its limitations. > > That's a good idea, except Inline::CPP doesn't work very well on Windows > with VC++ 6. > > Actually, the tests don't pass, but I think it's templates stuff, the basic > things aren't broken. > > Look at the bugs in RT to see a few hints on how to fix some problems yourself. > http://rt.cpan.org/NoAuth/Bugs.html?Dist=Inline-CPP > Microsoft have fixed both the 'templates' problem and the 16varlst.t problem with VC 7, though if you want to use VC 7 with perl you should first build perl with VC 7. I can't find a solution to the problem with 16varlst.t for VC 6. I guess if you can avoid that particular construct that VC 6 doesn't like, then it's not a problem. Cheers, Rob ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: More on Re: Windows DLL - Perl Interface
>From what I can tell, Win32::API is geared towards executing functions in DLLs. The DLL I need to interact with contains a few classes which I need to instantiate, then I need to access some methods to alter some attributes, then I need to access some other methods to actually do something. The whole idea was for me to save time by leveraging this DLL. Now I wonder if it is worth it. I have seen examples in VB6 interacting with it (the DLL) and it is 123! Once the "interface" to it from Win32 Perl is somehow "made" it will be even faster. I know some C but I never dabbled in C++. I am very surprised no one wrote a PM for this, I'll look at the modules mentioned below. In Win32::API it mentions that OO usage was not mandatory in the latest release but I don't see comments to using it that way. -Original Message- From: Lloyd Sartor [mailto:[EMAIL PROTECTED] Sent: Thursday, March 31, 2005 4:42 PM To: Bharucha, Nikhil Cc: Sisyphus; Perl-Win32-Users@listserv.ActiveState.com; [EMAIL PROTECTED] Subject: RE: More on Re: Windows DLL - Perl Interface It's not clear to me what is meant by "an OO manner." Is the DLL an implementation of one or more C++ classes? Or is the DLL being accessed from within a Perl class/object? Or both? Your questions lead me to consider passing objects between C++ and Perl. I don't know how that would/could be done. But it might be an interesting science project. But if I needed a solution in a timely manner, I would concisely define what must be OO, and then probably attack it with Inline::C or Inline:C++. Win32::API certainly has its limitations. I will be interested in hearing how you proceed. Good luck, Lloyd [EMAIL PROTECTED] wrote on 03/31/2005 03:21:42 PM: > Any updates on this? > > I have no choice but to access a DLL in an OO manner. Win32::API in its > latest release seems to be geared towards non-oo implementation > (importing it in to behave like a sub) with little doc on how to handle > it in an OO manner. Additionally, all of the packing and unpacking... > > Isn't there something easier to use out there? > > -Original Message- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED] On Behalf Of > Sisyphus > Sent: Tuesday, March 15, 2005 4:03 PM > Cc: Perl-Win32-Users@listserv.ActiveState.com > Subject: Re: More on Re: Windows DLL - Perl Interface > > Lloyd Sartor wrote: > > FYI - if I had to do it all over again, I would go the Inline::C > route, > > although it may take some time to get the compiler tools installed. > > > > That's my preferred route, too - and installing the "compiler tools" > amounts to nothing more than installing the MinGW binaries (and also > installing ExtUtils::FakeConfig if you're running ActiveState perl. > > Cheers, > Rob > > ___ > Perl-Win32-Users mailing list > Perl-Win32-Users@listserv.ActiveState.com > To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs > > > ___ > Perl-Win32-Users mailing list > Perl-Win32-Users@listserv.ActiveState.com > To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: More on Re: Windows DLL - Perl Interface
Any updates on this? I have no choice but to access a DLL in an OO manner. Win32::API in its latest release seems to be geared towards non-oo implementation (importing it in to behave like a sub) with little doc on how to handle it in an OO manner. Additionally, all of the packing and unpacking... Isn't there something easier to use out there? -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Sisyphus Sent: Tuesday, March 15, 2005 4:03 PM Cc: Perl-Win32-Users@listserv.ActiveState.com Subject: Re: More on Re: Windows DLL - Perl Interface Lloyd Sartor wrote: > FYI - if I had to do it all over again, I would go the Inline::C route, > although it may take some time to get the compiler tools installed. > That's my preferred route, too - and installing the "compiler tools" amounts to nothing more than installing the MinGW binaries (and also installing ExtUtils::FakeConfig if you're running ActiveState perl. Cheers, Rob ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: ppm and proxies
If you can browse the web at work then your browser is going through a proxy -- tools/internet options/connections/lan settings. For me I have to set the proxy and proxy user and proxy pass. The proxy pass is a pain because I have to manually change it every time my password changes.Add the 1 or 3 environment variables via control panel/system/environment variables. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Arnold Wiegert Sent: Wednesday, March 23, 2005 1:33 PM Cc: Perl-Win32 Subject: Re: ppm and proxies Lloyd Sartor wrote: > > Ask your network administrator - whoever manages your firewall. You > might check your browser configuration - it may already be configured to > use a proxy. > the manager and m'self are one and the same and neither of us knows :-( ;-) > That is information local to your network. It has nothing to do with > Perl and I don't think the list will be able to find the info for you. > I was hoping some one else might have had the same problem and solved it, but I guess not. ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Win32 FTP/SSL and SSH
Any thoughts on using Perl for this? I currently have Perl code that executes Win32 FTP programs like WS_FTP in script mode. It works good, but since I don’t have the WS_FTP Dev Kit ($$$) to access the API I create a script file on-the-fly and execute it. Now this works fine except for when connections break (dealing with the internet – it happens). Since I can’t single thread the files (I guess I could if I sent one file per process/login) retries may upload or download a file(s) twice. This may not matter locally, but when you deal with remote servers that sweep files immediately, they ultimately get duplicate files under this scenario. And under a scenario where you delete files downloaded you may run into trouble as well… What are peoples thoughts about the Perl Win32 options… are they reliable, etc. I use the standard FTP Perl module and it works very well and is very reliable. However, FTP/SSL and SSH are more complicated. It would be nice if ActiveState included these in their ActivePerl distributions. I would be willing to pay a little more for it rather than going outside on my own as it would be for business. I would be interested to hear from people that are running these Perl Win32 secure FTP solutions in a Production environment. Thanks, Nick ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Perl.exe VS JAVA for FTP function
I don't have any benchmarks but Win32 Perl FTP is very fast and reliable. Although it is pretty good on memory usage I do see that it spikes the CPU. -Original Message- From: Theisen, Gary [mailto:[EMAIL PROTECTED] Sent: Monday, November 22, 2004 12:13 PM To: Bharucha, Nikhil; 'Adam R. Frielink'; '[EMAIL PROTECTED]' Subject: RE: Perl.exe VS JAVA for FTP function Thanks for the reply's guys! I'm doing plane jane FTP cause our FTP server (the source from which I need to retrieve files from) is sitting on the inside of a firewall network. All the sFTP/SSH stuff occurs between a mainframe outside the network and the FTP server in question...so my app(s) fortunately don't need to deal with secure FTP. Yes, I need to use PAR become some of our machines are still microsoft and installing PERL on those machines is not an option (yes...but installing JAVA is). So the bottom line is that JAVA is just as good as PERL when it comes to transferring files (in identical situations of course), and the JAVA vs PERL PAR'd exe take the same resources such as memory & CPU? -Original Message- From: Bharucha, Nikhil [mailto:[EMAIL PROTECTED] Sent: Monday, November 22, 2004 9:02 AM To: Adam R. Frielink; Theisen, Gary; [EMAIL PROTECTED] Subject: RE: Perl.exe VS JAVA for FTP function I am in a similar situation as Gary. My shop is going towards Java but Perl has not been banned yet (and won't be for some "duct tape" like code that Java will never do). The FTP Perl Module is very stable and provides good functionality in Unix and Windows ports. Most of my transfers are executed on Windows so I use a Windows client for FTP/SSL and SSH which I execute from my Perl code. I wonder how well the Java classes are for FTP/SSL and SSH -- are they from Sun, Jakarta, etc? For Perl you have to go to a 3rd party to get the Windows port to work. My stuff is too mission-critical for that. If you are dealing with more than vanilla FTP let me know what you find out. Nick -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Adam R. Frielink Sent: Monday, November 22, 2004 11:45 AM To: Theisen, Gary; [EMAIL PROTECTED] Subject: RE: Perl.exe VS JAVA for FTP function In the future, please post in plain text. Do you need to PAR the file? Most *nix come with a version of Perl preinstalled. If that is the case, is it possible to just run a simple .pl script (< 10k, I am sure)? Or do you need to 'hide' the source for some reason? Functionality would/should be the same. Speed of data transfer is limited to the speed of the network, not necessarily the speed of the program. From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Theisen, Gary Sent: Saturday, November 20, 2004 3:41 AM To: '[EMAIL PROTECTED]' Subject: Perl.exe VS JAVA for FTP function Hi all, Now that I can successfully create perl.exe's (PERL 5.6.1.638) using PAR installed on a 32 bit win box...I'd like to know what scenario you would prefer and why. Perl .exe's or a JAVA (JDK 1.4) class file. (basically byte tree code vs compiled OO...right?). Basically, my every 1/2 hour 24x7 scheduled executable needs to be able to: 1. Get a data list from a MS SQL db, 7.0. 2. Use that data list to spin through it and perform an FTP GET foreach to a remote FTP server (& DELETE the remove file upon successfully GET). 3. Put the files into directories on the same calling box as the executable. 4. Write to process logs (& error logs when appropriate). 5. Delete files older than, say 31 days from the executable originating server. There would be approximately 100 to 400 files totaling between 50 to 600 mb's during peak times every 1/2 hour. Our account still has many $ICROSOFT boxes, but we're slowly moving towards *nix servers. It appears to me that an appropriate PERL .exe would be somewhere in the neighborhood of 1.3 to 1.5 mb's (created with PAR), and the JAVA class file would be around ~20-40 kb. Of course the difference would be that the JRE needs to be installed which is around 40-50 mb's. I am learning JAVA and used to code in PERL years ago, so I'm more familiar with the PERL syntax, however our account is leaning towards JAVA for newer projects. I realize that this question is posted on a list where subscribers would lean towards PERL, but which of the two "executables" would you prefer and why? Any benchmark's for this combination of functions? I would greatly appreciate any experience and or insight that any of you pro's can offer. Thanks in advance! Gary ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://lis
RE: Perl.exe VS JAVA for FTP function
I am in a similar situation as Gary. My shop is going towards Java but Perl has not been banned yet (and won't be for some "duct tape" like code that Java will never do). The FTP Perl Module is very stable and provides good functionality in Unix and Windows ports. Most of my transfers are executed on Windows so I use a Windows client for FTP/SSL and SSH which I execute from my Perl code. I wonder how well the Java classes are for FTP/SSL and SSH -- are they from Sun, Jakarta, etc? For Perl you have to go to a 3rd party to get the Windows port to work. My stuff is too mission-critical for that. If you are dealing with more than vanilla FTP let me know what you find out. Nick -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Adam R. Frielink Sent: Monday, November 22, 2004 11:45 AM To: Theisen, Gary; [EMAIL PROTECTED] Subject: RE: Perl.exe VS JAVA for FTP function In the future, please post in plain text. Do you need to PAR the file? Most *nix come with a version of Perl preinstalled. If that is the case, is it possible to just run a simple .pl script (< 10k, I am sure)? Or do you need to 'hide' the source for some reason? Functionality would/should be the same. Speed of data transfer is limited to the speed of the network, not necessarily the speed of the program. From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Theisen, Gary Sent: Saturday, November 20, 2004 3:41 AM To: '[EMAIL PROTECTED]' Subject: Perl.exe VS JAVA for FTP function I am learning JAVA and used to code in PERL years ago, so I'm more familiar with the PERL syntax, however our account is leaning towards JAVA for newer projects. I realize that this question is posted on a list where subscribers would lean towards PERL, but which of the two "executables" would you prefer and why? Any benchmark's for this combination of functions? I would greatly appreciate any experience and or insight that any of you pro's can offer. Thanks in advance! Gary ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Perl OO
Thanks for the help. An oversight in my code calling the oo pm. Seems to work good now. I concentrated on the oo code and didn't see the glaring problem in the method calls after new. #!/perl/bin/perl.exe package run; use Win32; use strict; use ISO::Transmitter; my %transmitterArgs = ( . . . ); my @displayArray = %transmitterArgs; print "[EMAIL PROTECTED]"; my $transmitter = Transmitter->new(%transmitterArgs); my $process = $transmitter->send(); $process = $transmitter->receive(); exit 0; -Original Message- From: Charles K. Clarkson [mailto:[EMAIL PROTECTED] Sent: Wednesday, September 29, 2004 6:24 PM To: Bharucha, Nikhil; [EMAIL PROTECTED] Subject: RE: Perl OO In separate messages, Bharucha, Nikhil <[EMAIL PROTECTED]> top-posted: : [snip] : sub send : { : my $self = shift; : print "\nIn send self is $self"; : my $process; : $process = $self->writePrefs(); : $process = $self->batchTransmitter("+XMIT"); : } : [snip] Methods that return values should do so specifically. sub send { my $self = shift; print "In send self is $self\n"; my $process = $self->writePrefs(); return $self->batchTransmitter( '+XMIT' ); } Which illustrates $process is unnecessary. sub send { my $self = shift; print "In send self is $self\n"; $self->writePrefs(); return $self->batchTransmitter("+XMIT"); } : I forgot, the following error occurs when strict is used "Can't : use string ("Transmitter") as a HASH ref while "strict refs" in : use at" : use ISO::Transmitter; : [snip] : . : . : . : [snip] : $process = Transmitter->new(%transmitterArgs); : $process = Transmitter->send(); That should probably be: use ISO::Transmitter; [snip] . . . [snip] $process = ISO::Transmitter->new(%transmitterArgs); $process = $process->send(); Additionally, Transmitter.pm should be located in the "ISO" directory. HTH, Charles K. Clarkson -- Mobile Homes Specialist 254 968-8328 ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Perl OO
I forgot, the following error occurs when strict is used “Can't use string ("Transmitter") as a HASH ref while "strict refs" in use at” Transmitter is the OO Perl Module being called. -Original Message----- From: Bharucha, Nikhil Sent: Wednesday, September 29, 2004 1:42 PM To: [EMAIL PROTECTED] Subject: Perl OO I am taking a stab at writing an OO Perl Module. The constructor sets a to a hash I pass to it. Problem is when I call a method after the new method and attempt to retrieve the contents of the hash I get nothing. I know my spelling of the hash variable is not off so it’s not simply that it doesn’t exist. I am using the latest perl dev kit and active perl. Nick ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Perl OO
Very good point. I have attached the OO code first and the calling code below. The bolded code is where it dies at. ### Constructor ### sub new { my ($proto,%args) = @_; my $class = ref($proto) || $proto; my $objRef = { server => $args{server}, userid => $args{userid}, password => $args{password}, dirTransmitter => $args{dirTransmitter}, dirInbox => $args{dirInbox}, dirOutbox => $args{dirOutbox}, dirTransferred => $args{dirTransferred}, dirLogs => $args{dirLogs}, dirTemp => $args{dirTemp}, prefName => "" }; bless $objRef, $class; #my @displayArray = $objRef; #print "[EMAIL PROTECTED]"; print "\nContents of instance variables below\n$objRef"; print "\nInstance variable for server is $objRef->{server}"; print "\nInstance Variable for dirTemp is $objRef->{dirTemp}"; return $objRef; } sub send { my $self = shift; print "\nIn send self is $self"; my $process; $process = $self->writePrefs(); $process = $self->batchTransmitter("+XMIT"); } sub writePrefs { my $self = shift; print "\nIn writePrefs self is $self"; my $directory = $self->{dirTemp}; print "\nwritePrefs directory is $directory"; my $prefName = $directory . "\\preferences." . time; $self->{prefName} = $prefName; print "\n\nCreating Preference file $prefName"; open (OUTHANDLE, ">$prefName") or die "\nCannot Open Preferences file $prefName!"; my $process = $self->printPrefs(); close OUTHANDLE or die "\nCannot Close Preferences file $prefName!"; } Some of the code that calls the PM is #!/perl/bin/perl.exe package run; use Win32; use strict; use ISO::Transmitter; my $process; . . . my @displayArray = %transmitterArgs; print "[EMAIL PROTECTED]"; $process = Transmitter->new(%transmitterArgs); $process = Transmitter->send(); -Original Message- From: Wagner, David --- Senior Programmer Analyst --- WGO [mailto:[EMAIL PROTECTED] Sent: Wednesday, September 29, 2004 2:12 PM To: Bharucha, Nikhil; [EMAIL PROTECTED] Subject: RE: Perl OO For anyone to help, we will need to see a snippet of code to get an idea otherwise I don't think you will get a lot of help. Give the group something to work with. Wags ;) -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]On Behalf Of Bharucha, Nikhil Sent: Wednesday, September 29, 2004 10:42 To: [EMAIL PROTECTED] Subject: Perl OO I am taking a stab at writing an OO Perl Module. The constructor sets a to a hash I pass to it. Problem is when I call a method after the new method and attempt to retrieve the contents of the hash I get nothing. I know my spelling of the hash variable is not off so it’s not simply that it doesn’t exist. I am using the latest perl dev kit and active perl. Nick *** This message contains information that is confidential and proprietary to FedEx Freight or its affiliates. It is intended only for the recipient named and for the express purpose(s) described therein. Any other use is prohibited. *** ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Perl OO
I am taking a stab at writing an OO Perl Module. The constructor sets a to a hash I pass to it. Problem is when I call a method after the new method and attempt to retrieve the contents of the hash I get nothing. I know my spelling of the hash variable is not off so it’s not simply that it doesn’t exist. I am using the latest perl dev kit and active perl. Nick ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: assembly codes inside perl?
Never forget that most often there are 3,4,5 ways of doing something in Perl. Some ways are slower but may not seem so unless under heavy load. Perl meets my needs and is very fast with arrays. Of course if you have a process that performs something like a simple math function many many times then the only way to guarantee that it is doing so efficiently is to code it in Assembler where you have full control. We had a situation where compiled C code was performing 9 instructions where it was replaced by 1 instruction in Assembler. The example immediately below would probably be even faster if coded in Assembler -- but Assembler should be the last resort. -Original Message- From: Mark Harris [mailto:[EMAIL PROTECTED] Sent: Wednesday, June 23, 2004 10:03 AM To: [EMAIL PROTECTED] Subject: RE: assembly codes inside perl? I've seen improvements on this scale by replacing Perl code with C. I had a dynamic-programming string comparison algorithm, which compares all the subsequences of a short string against a longer one. It creates an array of size approximately 500x20, and reuses the same array every time to avoid creating a new one and garbage collecting old ones. The program calls the comparison function to populate and search this table somewhere around 20'000 times. I tried this in perl first, and profiled it using the -d:DProf option. The time per call was 0.0095 seconds, giving a total cumulative time of 186 seconds for 2 calls. I replaced the perl function with the C equivalent embedded in the Perl using Inline::C. On the same dataset, the cumulative time taken up by the calls was only 1.28 seconds. I suspect the speed up was due to the sheer speed with which C can access arrays compared to Perl. -Original Message----- From: Bharucha, Nikhil [mailto:[EMAIL PROTECTED] Sent: 23 June 2004 14:39 To: Jaime Teng; [EMAIL PROTECTED] Subject: RE: assembly codes inside perl? You may want to look at your Perl code first. I can't see such a big difference between C++ and Perl. -Original Message- From: Jaime Teng [mailto:[EMAIL PROTECTED] Sent: Wednesday, June 23, 2004 9:26 AM To: [EMAIL PROTECTED] Subject: assembly codes inside perl? Hi, Has anyone done some Assembly Language Programming inserted into Perl scripts? If so, can you show a sample? I am in need of speeding up a very recursive function; in perl, it took almost an hour; in C++, it took a few seconds. I wanted more speed. thanks. Jaime Email Advisory== To ensure delivery of message to [EMAIL PROTECTED], please contact your email provider and ask them if your email server has a valid DNS entry. Public Email Servers must have a valid hostname and routeable public IP Address per RFC1912 compliance. To test the compliance of your email server, please send an email to: [EMAIL PROTECTED]; our server will reply with a result within minutes. ==Email Advisory ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs This message contains confidential and potentially legally privileged information solely for its intended recipients and others may not distribute, copy or use it. If you have received this communication in error, please tell us by return email and delete it, and any copies of it. ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: assembly codes inside perl?
You may want to look at your Perl code first. I can't see such a big difference between C++ and Perl. -Original Message- From: Jaime Teng [mailto:[EMAIL PROTECTED] Sent: Wednesday, June 23, 2004 9:26 AM To: [EMAIL PROTECTED] Subject: assembly codes inside perl? Hi, Has anyone done some Assembly Language Programming inserted into Perl scripts? If so, can you show a sample? I am in need of speeding up a very recursive function; in perl, it took almost an hour; in C++, it took a few seconds. I wanted more speed. thanks. Jaime Email Advisory== To ensure delivery of message to [EMAIL PROTECTED], please contact your email provider and ask them if your email server has a valid DNS entry. Public Email Servers must have a valid hostname and routeable public IP Address per RFC1912 compliance. To test the compliance of your email server, please send an email to: [EMAIL PROTECTED]; our server will reply with a result within minutes. ==Email Advisory ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: kick this guy off the list please
He's a Brazilian (or Brasilian)... Tudo Bem (All is Well)! -Original Message- From: Grakowsky, Richard (ETS: Communications and Network Services) [mailto:[EMAIL PROTECTED] Sent: Tuesday, May 18, 2004 4:48 PM To: [EMAIL PROTECTED] Subject: RE: kick this guy off the list please I second the motion. I've added the InBox rule to delete anything coming from him, but its still annoying. Thanks, Rick Richard Grakowsky Senior Systems Specialist, Monroe Community College [EMAIL PROTECTED] Office: 585.292.3236 / Fax: 585.427.2749 "Progress occurs when we are no longer willing to accept the consequences of inaction." ETS Tech News - Virus Information, Quick Tips and More... -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Chris Purcell Sent: Tuesday, May 18, 2004 4:14 PM To: [EMAIL PROTECTED] Subject: kick this guy off the list please Everytime I post to the list I get this message from this guy (below). Please kick him off the list as its getting annoying. This wouldnt' be tolerated on any other lists that I'm on. Most lists will boot you for sending one Out of Office message. AntiSpam UOL <[EMAIL PROTECTED]> Original Message Subject: RE:Re: Poblems installing Math-Pari From: AntiSpam UOL <[EMAIL PROTECTED]> Date: Tue, May 18, 2004 4:11 pm To: perl <[EMAIL PROTECTED]> Olá, Você enviou uma mensagem para [EMAIL PROTECTED] Para que sua mensagem seja encaminhada, por favor, clique aqui Esta confirmação é necessária porque [EMAIL PROTECTED] usa o Antispam UOL, um programa que elimina mensagens enviadas por robôs, como pornografia, propaganda e correntes. As próximas mensagens enviadas para [EMAIL PROTECTED] não precisarão ser confirmadas*. *Caso você receba outro pedido de confirmação, por favor, peça para [EMAIL PROTECTED] incluí-lo em sua lista de autorizados. Atenção! Se você não conseguir clicar no atalho acima, acesse este endereço: http://tira-teima.as.uol.com.br/challengeSender.html?data=e5zD57ngu9WaSLIdm8YIXMfQ3z9rWQHZKPePD3ECTK1gadPGXTDFHSeFG1LHADfkdvOl85Trf440%0AmgDtEQKDq5CqGd2ETUSADfv3wgmellqoARcrk5G4B2%2FI%2F5vGBWKCnkbJn%2FMkW4eWZ28OcSsmbw%3D%3D Hi, You´ve just sent a message to [EMAIL PROTECTED] In order to confirm the sent message, please click here This confirmation is necessary because [EMAIL PROTECTED] uses Antispam UOL, a service that avoids unwanted messages like advertising, pornography, viruses, and spams. Other messages sent to [EMAIL PROTECTED] won't need to be confirmed*. *If you receive another confirmation request, please ask [EMAIL PROTECTED] to include you in his/her authorized e-mail list. Warning! If the link doesn´t work, please copy the address below and paste it on your browser: http://tira-teima.as.uol.com.br/challengeSender.html?data=e5zD57ngu9WaSLIdm8YIXMfQ3z9rWQHZKPePD3ECTK1gadPGXTDFHSeFG1LHADfkdvOl85Trf440%0AmgDtEQKDq5CqGd2ETUSADfv3wgmellqoARcrk5G4B2%2FI%2F5vGBWKCnkbJn%2FMkW4eWZ28OcSsmbw%3D%3D Use o AntiSpam UOL e proteja sua caixa postal RdFhCfCggWeb = '1996-'; ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: system
There are many API differences between 98 and Win2K Pro (NT Kernel). Code written in Win2K should take you through the latest XP releases with no problem. Let's see what happens with the Longhorn release in the future... -Original Message- From: Michael D. Smith [mailto:[EMAIL PROTECTED] Sent: Tuesday, March 09, 2004 9:43 AM To: [EMAIL PROTECTED] Subject: Re: system I too have noticed that 'system' commands that worked on win98, don't on win2000 pro. For instance, I could execute a shortcut (using start.exe), that I can find no way to do on 2k. This: system("cmd /c dir /s"); does work on 2k. But this syntax: system('cmd', '/c', 'dir', '/s'); I have found to be more reliable on windoze. And if you put in the full path even more so. And this original one: system("dir /s"); looks like *NIX to me but win98 would call/use start.exe automatically (sometimes -- if it felt like it:), so it could've worked on 98. Double quotes with no interpolation look *INX as well. You can't really expect a script to go from *INX to Windoze without some tweaking. I did expect them to go from 98 to 2000, but almost every one required some fixing and some, I still haven't found the correct method and/or syntax. ms Don't die... With your music still within you. At 07:27 AM 3/9/2004, you wrote: >I've never seen this. > >I have a 2k box with 5.8. This simple one liner will not run. >Any ideas (besides an OS reinstall). Everything else runs just >fine. Only system fails. (All the other boxes run it) > > >system("dir /s"); > > >__ >Do you Yahoo!? >Yahoo! Search - Find what you're looking for faster >http://search.yahoo.com >___ >Perl-Win32-Users mailing list >[EMAIL PROTECTED] >To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Perl Certifications ??
Medium size and larger companies want the benefits afforded by J2EE -- Reliability, Reusability, Readability, Legacy Adapters, Interfaces, EJBs, etc. I use PERL for misc tasks where it excels. I didn't mean that a PERL Cert would be useless, rather J2EE from a marketability standpoint. Problem here is that the outsourcing countries have both of these skills in large number -- J2EE and PERL. -Original Message- From: Andrew Timberlake-Newell [mailto:[EMAIL PROTECTED] Sent: Wednesday, February 25, 2004 4:14 PM To: [EMAIL PROTECTED] Subject: RE: Perl Certifications ?? I've seen Perl used in "business environments" in each of the following roles: A) The primary development language B) A co-primary along with PHP C) One of many languages used on a per-task basis...with no real primary D) "Tool" usage for auxiliary support of another "primary" language The idea that Perl is merely an auxiliary/small-job language is nothing more than a misconception arising largely from the fact that it is frequently used that way. (After all, despite the quipping of TIMTOWTDI, we programmers are not immune from assuming that the first way we've seen something done is the (only|correct) way to do it.) Personally, I think that the Perl community could benefit from a credible Certbut I'll be surprised if the level of cynicism ever allows a Cert to become widely regarded as credible. > -Original Message- > From: [EMAIL PROTECTED] [mailto:perl-win32- > [EMAIL PROTECTED] On Behalf Of Bharucha, Nikhil > Sent: Friday, February 06, 2004 1:10 PM > > PERL is kind of a jack-of-all trades language. It is a scripting > language. In business environments (where certification means > something) PERL is not the primary development language at the > Enterprise level. It is an extremely versatile "Tool" to get small and > medium sized jobs done and done right. > > Certification? If you want to get certified get J2EE Certification. > Know PERL to use PERL. PERL as a primary skill at the business level is > not a good idea, but as an integral part of your skill set YES. > > At my place of employment we use PERL to get the misc jobs done (and the > crap still left around from the 90's internet boom -- still works pretty > good though!) ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: java to perl
It is easier going from JAVA to PERL than PERL to JAVA. Mostly because PERL is more flexible and most often there are numerous alternatives to code a situation. JAVA is more rigid. I can't help you with specific guidance other than to say that if you know JAVA you can learn PERL quickly. -Original Message- From: Toby Stuart [mailto:[EMAIL PROTECTED] Sent: Thursday, February 12, 2004 5:32 PM To: 'H. krishna'; [EMAIL PROTECTED] Subject: RE: java to perl > -Original Message- > From: H. krishna [mailto:[EMAIL PROTECTED] > Sent: Thursday, February 12, 2004 4:35 PM > To: [EMAIL PROTECTED] > Subject: java to perl > > > Dear All, > > I have java program. I need to convert java to perl > code. Any guidance is appreciated. > > Thanks in advance, > > Regards, > balakrishnan, h. > > What does the java program do? Chances are you can convert it to perl...and in much less lines. ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Perl Certifications ??
PERL is kind of a jack-of-all trades language. It is a scripting language. In business environments (where certification means something) PERL is not the primary development language at the Enterprise level. It is an extremely versatile "Tool" to get small and medium sized jobs done and done right. Certification? If you want to get certified get J2EE Certification. Know PERL to use PERL. PERL as a primary skill at the business level is not a good idea, but as an integral part of your skill set YES. At my place of employment we use PERL to get the misc jobs done (and the crap still left around from the 90's internet boom -- still works pretty good though!) -Original Message- From: Chris Snyder [mailto:[EMAIL PROTECTED] Sent: Friday, February 06, 2004 11:11 AM To: 'Savinder Puri'; [EMAIL PROTECTED] Subject: RE: Perl Certifications ?? Savinder Puri wrote: --- snip --- Hello All, Are there any *recognised* Perl certifications available... something along the lines of (shall i dare say!!) MCSE etc ?? Any links would be a great help. Thanks, Savinder. --- snip --- Not really. Not only will you find a great deal of variety in developers for/against it, you will finda great variety in what people think of the rest of the programmers. I have read articles that talk about the overwhelming support for/against certification in the perl community. Personally, I do not care. There are, none-the-less, certification courses out there. If you just want one for your resume, find the one that would look best on paper (don't go with "Bob's perl certification course"). WOW (Word-Of-Warning), you run the risk of drawing ridicule and apathy should the reader of your resume be one of the 5% or 95% (depending upon your source) of perl programmers against certification. So, this is a long way of saying that nothing is sanctioned, like MCSE is by Microsoft. ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Command Line WinZip Executed From Win32 Perl Script
My fix today is to close STDOUT and STDERR logs and reopen in append mode just before I execute WinZip via Win32:Process Create method. Doing this forces ALL Winzip messaging to append the log. The only exception is the "Searching..." that gets written to STDERR -- I can deal with this. -Original Message----- From: Bharucha, Nikhil Sent: Tuesday, December 16, 2003 1:13 PM To: [EMAIL PROTECTED] Cc: [EMAIL PROTECTED] Subject: RE: Command Line WinZip Executed From Win32 Perl Script HT, I have it installed and functionally it works great. I am just trying to make my logs look nicer which I attach to an email my process generates. Nick -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Sent: Tuesday, December 16, 2003 1:07 PM To: Bharucha, Nikhil Cc: [EMAIL PROTECTED] Subject: Re: Command Line WinZip Executed From Win32 Perl Script Nick, Download the WinZip Command Line Support Add-On here: http://www.winzip.com/other.htm See if that works better for you. HT - Original Message ----- From: "Bharucha, Nikhil" <[EMAIL PROTECTED]> Date: Tuesday, December 16, 2003 11:28 am Subject: Command Line WinZip Executed From Win32 Perl Script > Hi, > > > > Has anyone redirected WinZip output to a separate file? I can't > seem to > get it to work. Currently, it defaults to Standard Output but > writes to > the beginning for the first zip and then it appends, and it always > writes "Searching." to Standard Error. One site recommended > adding>> with the file but Winzip thinks it is another file to zip. > > > > > > Nick > > ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Command Line WinZip Executed From Win32 Perl Script
HT, I have it installed and functionally it works great. I am just trying to make my logs look nicer which I attach to an email my process generates. Nick -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Sent: Tuesday, December 16, 2003 1:07 PM To: Bharucha, Nikhil Cc: [EMAIL PROTECTED] Subject: Re: Command Line WinZip Executed From Win32 Perl Script Nick, Download the WinZip Command Line Support Add-On here: http://www.winzip.com/other.htm See if that works better for you. HT - Original Message - From: "Bharucha, Nikhil" <[EMAIL PROTECTED]> Date: Tuesday, December 16, 2003 11:28 am Subject: Command Line WinZip Executed From Win32 Perl Script > Hi, > > > > Has anyone redirected WinZip output to a separate file? I can't > seem to > get it to work. Currently, it defaults to Standard Output but > writes to > the beginning for the first zip and then it appends, and it always > writes "Searching." to Standard Error. One site recommended > adding>> with the file but Winzip thinks it is another file to zip. > > > > > > Nick > > ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Command Line WinZip Executed From Win32 Perl Script
Hi, Has anyone redirected WinZip output to a separate file? I can’t seem to get it to work. Currently, it defaults to Standard Output but writes to the beginning for the first zip and then it appends, and it always writes “Searching…..” to Standard Error. One site recommended adding >> with the file but Winzip thinks it is another file to zip. Nick