Re: Net::cmd and dialog
Jeff Saxton wrote: use Expect; There's no Expect for ActivePerl. -- Serguei Trouchelle ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: How do I create arrays in OO format?
Brian Raven wrote:
Read the documentation on OO that comes with Perl (perldoc perl$_
foreach qw{boot toot tooc bot}). Also Damian Conway's book comes highly
recommended. I can't remember toe title off-hand, but you can google for
it.
Perl Best Practices
Also, ppm install Perl::Critic and then perldoc perlcritic
--
Serguei Trouchelle
___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Text Encrypt and Decryption
Kprasad wrote: Thanks for your reply. Actually my system has been used by number of users and anybody can change my coding of other valuable script (.pl or .plx). All script will be kept encoded rather than open code, I'll decrypt again as and when it's required. Is there any better option which can be used for this purpose? 1. use Acme::Bleach; http://search.cpan.org/~dconway/Acme-Bleach-1.12/ It's not actually a solution, because anyone can decode your script. 2. use Subversion or other source control mechanism. Doesn't help from somebody who's smart enough, but it keeps a track of changes, so at least you can see what was changed. 3. setup file system security, so other users wouldn't change anything that belongs to you. Doesn't protect from users with administrative accounts. -- Serguei Trouchelle ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Resolve hostname by specified nameserver
rocku wrote: I am aware about Net::DNS, but unfortunately I cannot use it because it's not standard in ActivePerl 5.10. Is there any reason not to run ppm install Net::DNS to install it? -- Serguei Trouchelle ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: not working action=cgi-bin/*.cgi with perl
Trailing slash: /cgi-bin/form1.cgi Kprasad wrote: Could you tell me that why below mentioned line not working FORM ACTION=cgi-bin/form1.cgi ACCEPT=text/xml ENCTYPE=multipart/form-data METHOD=POST -- Serguei Trouchelle ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: not working action=cgi-bin/*.cgi with perl
Sorry, leading, of course (never type before you think! :) Serguei Trouchelle wrote: Trailing slash: /cgi-bin/form1.cgi Kprasad wrote: Could you tell me that why below mentioned line not working FORM ACTION=cgi-bin/form1.cgi ACCEPT=text/xml ENCTYPE=multipart/form-data METHOD=POST -- Serguei Trouchelle ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: need help from a new hand for perl
Fei Shi wrote: The error message is as follows: *Copying subject file 'cp' is not recognized as an internal or external command, operable program or batch file. formatting subject file [NULL_Caption] ERROR: Could not open blast_dir_temp/file_subject Try to install MSYS: http://www.mingw.org/wiki/msys It contains rm, cp and other unix-like commands. -- Serguei Trouchelle ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: GUI based perl
I'd say Tkx because Tk is no longer developed. Also, wxPerl (and Cava Packager) may be an interesting alternative to Tk*. mohammed.must...@wipro.com wrote: Use perl *TK *utility. -- Serguei Trouchelle ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: No performance hit by compressing + encrypting data(?)
Al Mollenkopf wrote: working on a server/client that encrypts payloads (in chunks) for transmission, trying to profile payloads prior to sending but puzzled by no performance hit by adding compression. Question: Anyone have any insight why there virtually no loss of processing performance when adding zlib compression to the process (perl is just that good both bin and ascii)? Zlib compression is faster then (almost) any crypt algorithm. Moreover, Crypt::CBC is PP, Compress::Zlib is XS-based. No wonder that you found no performance hit when adding compression. am I just interpreting DProf results incorrectly? No, you are correct. -- Serguei Trouchelle ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Perl and memory...
Chris Wagner wrote:
Or, as your question partially suggests, use threads: ending a thread will
release the memory back to OS.
Really?
Yes, here's an example (takes about 200M of memory and releases it):
_
#!/usr/bin/perl -w
use strict;
use warnings;
use threads;
$| = 1;
sub start_thread {
my $count = shift;
my @var = 1 .. $count;
print 'Ok, we ate some memory...';
;
}
my $thr = threads-create('start_thread', 4_000_000);
$thr-join();
print 'We freed it';
;
print 'Let us eat again... ';
$thr = threads-create('start_thread', 4_000_000);
$thr-join();
print 'We freed it';
;
___
Is that documented anywhere? Knowing that could've saved me a lot
of trouble on a massively threaded long running application I made a while
ago.
I'm not sure. Ending thread on Windows deallocates memory as it said in MSDN,
but I'm not exactly sure how Perl handles
all this stuff.
Perlthrtut should have that kind of information. Who maintains that?
perl5_porters, I believe.
--
Serguei Trouchelle
___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Perl and memory...
Chris Wagner wrote: I'm not sure. Ending thread on Windows deallocates memory as it said in MSDN, but I'm not exactly sure how Perl handles all this stuff. So that could be Windows specific? The application I made was on Solaris. Yes, it could. From the other hand, once I had a script on Linux, that had to iterate an array of ~1000 big records (100M memory total), and replacing foreach my $obj (@objects) with while (my $obj = shift @objects) and using weak references (Scalar::Util) in these objects actually lead to memory usage decrease on every iteration. But this method doesn't work on Windows, so, I believe, it's up to OS. I actually thought it was a memory leak in my code. After I found out Perl couldn't free() memory I gave up on trying to shrink the process size and implemented a multiprocess system to deal with the memory issue. Well, you may try the script I sent in previous message to check how threads work on Solaris. If they actually free memory on thread completion, it would be good. -- Serguei Trouchelle ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Perl and memory...
Amine wrote:
How can i 'force' Perl to return the used memory ?
You cannot. This memory is actually free, you can still use it in your program,
as you can see when you run func once
again.
Or, as your question partially suggests, use threads: ending a thread will
release the memory back to OS.
When you will run this script , you will see that the
second call to func() does take a lot of time(much more
than the first call) , why ?
It takes the same time for me (I've changed one million to five):
#!/usr/bin/perl;
use strict;
use warnings;
use Time::HiRes qw/time/;
my $time = time;
sub func
{
my @b;
for (my $i=0;$i500;$i++)
{ $b[$i] = 'Perl';}
undef @b;
print '@b memory returned..';
print $time - time, sec\n;
}
func;
print $time - time, sec\n;
func;
print $time - time, sec\n;
func;
print $time - time, sec\n;
print end ...\n;
--
Serguei Trouchelle
___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: ppm file question
Greg Aiken wrote: PROVIDE NAME=XML::Validate VERSION=1.025/ PROVIDE NAME=XML::Validate::Base VERSION=1.009/ PROVIDE NAME=XML::Validate::LibXML VERSION=1.020/ PROVIDE NAME=XML::Validate::MSXML VERSION=1.018/ PROVIDE NAME=XML::Validate::Xerces VERSION=1.021/ REQUIRE NAME=Log-Trace/ Does this mean that all of the following packages are fully included within the main ‘XML-Validate’ software package? a. XML::Validate b. XML::Validate::Base c. XML::Validate::LibXML d. XML::Validate::MSXML e. XML::Validate::Xerces Modules, not packages. So you can run ppm install XML::Validate::Xerces, and ppm will install XML-Validate for you. -- Serguei Trouchelle ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Older version of CAM::PDF ( 1.13)
Phillip Richcreek wrote: I'd like to get hold of a version of CAM::PDF prior to 1.13. 1.52 and 1.13 are available, but I can't find a repository that advertises anything prior to 1.13. I tried the ones in PPM::REPOSITORY that have '5.6' in their description (thinking that if they still have 5.6 perl they might also have older versions of things like CAM::PDF) and all of those failed when I tried to add them with ppm:gui. I want the older version so that I can do comparison with 1.52 to troubleshoot a problem I'm having with CAM::PDF:Renderer::Text (see earlier post if interested!). Any idea where I might be able to find the older version? You can make it yourself, it's easy: CPAN has 1.12 and other versions, http://search.cpan.org/~cdolan/CAM-PDF-1.12/ It's pure perl and it uses Module::Build so you don't even have to have make. Just download, untar/ungzip, run perl Build.PL, Build test and Build install. -- Serguei Trouchelle ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: LWP::UserAgent 'Ordinal not Found'
Phillip Richcreek wrote: I'm getting the following error(s) using LWP::UserAgent... (POP-UP) Perl.exe - Ordinal not found The ordinal 3212 could not be located in the dynamic link library LIBEAY32.dll There's older version of libeay32.dll somewhere in your path. Run cmd.exe and type: set PATHEXT=%PATHEXT%;.DLL pwhich -a libeay32.dll First path will show you the actually used file. I'd get rid of other files once you manage your script to work. Also, try to copy libeay32.dll from perl/bin to /perl/site/lib/auto/Crypt/SSLeay I have, in fact, installed Crypt::SSLeay, which put LIBEAY32.dll into perl/bin. There ARE other LIBEAY32's present in the MSDOS path and I've tried using those as well and get the same result. I now have perl/bin at the front of the path. I also downloaded a more recent verions of LIBEAY32 from sourceforge and got the same result. If it put dll to perl/bin, it's (very probably) Randy's repository, and Crypt::SSLeay from there is definitely working. Try to find older dlls on your system. -- Serguei Trouchelle ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Advice requested, porting unix perl app to windows
Dennis Daupert wrote: Thanks for the information. The problem we've run into using sftp is that we need to have an sftp server running on the target machine. Management are keen on saving money, but also have the fixated paradigm that server products have to be cost money, i.e., have some company behind them for support. There is allowance made for in-house code (a la Perl), so if there is a way of using windows natively for file-transfer operations by way of Perl code, that would be optimal. I'd recommend FileZilla as SFTP server, as it's free, but it's not that good in your case. If Apache is allowed by that paradigm, you may want to setup server on Apache+SSL, serving cgi/mod_perl requests by client, based on libwww-perl. -- Serguei Trouchelle ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Net::SSH2 v0.18
listmail wrote: Dialog title: perl.exe - Entry Point Not Found Dialog text : The procedure entry point Perl_sv_2uv_flags could not be located in the dynamic link library perl58.dll. Maybe I need to jump to build 824? I have to be careful here because I don't necessarily want to blow up my Net::SSH::W32Perl setup as I don't know the status of the soulcage repo that I used to quite some time ago to get that installed. I googled a thread from this mailing list about this issue: http://www.mail-archive.com/perl-win32-users@listserv.activestate.com/msg36994.html It looks like builds prior to 822 are not fully binary-compatible with recent versions. The Net::SSH:W32Perl functionality is still working as well so maybe now I can finally get things switched over. -- Serguei Trouchelle ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: [SPAM] Re: NET SSH2 ppm for 5.10
Sisyphus wrote: When I use your ppm, if I run the attached test script (using the SSH2 server on my linux box at 192.168.0.3 for the extended tests) , the script segfaults after test 28 has been run. Here's the output: [...] ok 28 - new channel isa Net::SSH2::Channel At which point the process gets killed [...] With the ppm that I built (and which is now available from the uwinnipeg rep), that doesn't happen: [...] As you can see, it's not perfect either :-) Hmmm. Yes, I have the same thing here, before and after installing from Randy's repository. I've used automated tests when building with auto-answers, so real tests were just skipped with all tests successful result. I should point out that the attached test script is essentially the one that ships with the Net-SSH2-0.18 source, but it has been modified to cater for some Win32-specific issues. How was your libssh2 dynamic lib built ? My ppm was built against a static MinGW-built libssh2. I suspect that the difference as regards test 29 comes down to a difference between the respective C libraries. It's dynamic libssh2 0.18 (Win32 DLL Release), built with OpenSSL 0.9.8d (the same that on UWinnipeg) and Zlib1.dll 1.2.3. I've failed to build static version (MSVC doesn't seem to be happy with static versions). Should not be a problem, as I drop everything existing in UWinnipeg from my repository (well, a robot drops actually). Anyway, thanks for pointing this out. -- Serguei Trouchelle ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: NET SSH2 ppm for 5.10
Michael Ellery wrote: does anyone know of a source for a NET::SSH2 ppm for 5.10? I managed to get this from uwinnipeg for 5.8, but ppm is telling me it can't find it in the 5.10 repository (now that I've upgraded). Try this: ppm install http://trouchelle.com/ppm10/Net-SSH2.ppd -- Serguei Trouchelle ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
