Re: [Perl-unix-users] how to speed up perl script load...

2005-10-23 Thread $Bill Luebkert
eyal edri wrote: > As you probably know the more modules use in your script the more time > it takes to load.. > > I've just finished a script (more like a program) which uses lot of perl > modules and has more than 2000 code lines. > Each time i run it, it takes more than 15 seconds to load.. :(

[Perl-unix-users] how to speed up perl script load...

2005-10-23 Thread eyal edri
As you probably know the more modules use in your script the more time it takes to load.. I've just finished a script (more like a program) which uses lot of perl modules and has more than 2000 code lines. Each time i run it, it takes more than 15 seconds to load.. :( I've read a few aricles ab

Re: [Perl-unix-users] How to set a local SHELL variable?

2005-10-23 Thread $Bill Luebkert
eyal edri wrote: > Hi, > > i want to set a local VAR on my tcsh. > such as : > > HTTP_proxy="http://myCompany.proxy.com:8080"; > > i've tried using: > > system("setenv HTTP_proxy "http://myCompany.proxy.com:8080";) > ; > `setenv HTTP_proxy "http://myCompany.p

[Perl-unix-users] How to set a local SHELL variable?

2005-10-23 Thread eyal edri
Hi, i want to set a local VAR on my tcsh. such as : HTTP_proxy="http://myCompany.proxy.com:8080" i've tried using: system("setenv HTTP_proxy "http://myCompany.proxy.com:8080"); `setenv HTTP_proxy "http://myCompany.proxy.com:8080"` also tried adding this to the /.cshrc and running: system ("s

Re: [Perl-unix-users] Sending array as a refference to a Sub

2005-10-23 Thread $Bill Luebkert
eyal edri wrote: > Hi, > > i want to know how can i send an array (@array) as reference to a sub > routine. > Just like in java or c# for eg: > > sub doSomething() > { > my $item; > push ($_[0], $item); > } > > #main > > doSomething (@array); > print @array; -- > i should now see it

[Perl-unix-users] Sending array as a refference to a Sub

2005-10-23 Thread eyal edri
Hi, i want to know how can i send an array (@array) as reference to a sub routine. Just like in java or c#  for eg: sub doSomething() { my $item; push ($_[0], $item); } #main doSomething (@array); print @array;  -- > i should now see item printed. thank you.-- Eyal Edr