[27714] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 9131 Volume: 10

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Apr 7 14:05:49 2006

Date: Fri, 7 Apr 2006 11:05:04 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)

Perl-Users Digest           Fri, 7 Apr 2006     Volume: 10 Number: 9131

Today's topics:
    Re: Apache/PHP 5.1.2/mod_perl Solaris 10 Problem <rjansen@vub.ac.be>
        Namespace resolution question: I'm somewhat puzzled <David.Squire@infotech.monash.edu.au>
        perlcc error - 'Can't unlink error file...' <urbpublic@hotmail.com>
    Re: perlcc error - 'Can't unlink error file...' <1usa@llenroc.ude.invalid>
    Re: perlcc error - 'Can't unlink error file...' <mothra@nowhereatall.com>
    Re: XS progamming question <bol@adv.magwien.gv.at>
    Re: XS progamming question (Anno Siegel)
        Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: Fri, 07 Apr 2006 18:34:06 +0200
From: "Jansen Robert" <rjansen@vub.ac.be>
Subject: Re: Apache/PHP 5.1.2/mod_perl Solaris 10 Problem
Message-Id: <op.s7nca4ww1vvuh1@rcmc3.vub.ac.be>

On Thu, 06 Apr 2006 17:49:31 +0200, Brian Wakem <no@email.com> wrote:

> Robert Jansen wrote:
>> Hi,
>>  After several days of debugging I think I figured out that perl 5.8.3  
>> with
>> a default config doesn't work properly on Solaris 10.
>>  I installed on a Solaris 10 (doing a major upgrade from a working  
>> Solaris
>> 9 similar setup ) the following:
>>  Apache/1.3.34 (Unix) PHP/5.1.2 mod_perl/1.29 using the Solaris malloc
>> (perl 5.8.3 configured with -Uusemyalloc (means: don't use perl's  
>> malloc)
>> and the rest default)
>> (All compiled with the Sunfreeware gcc 3.3.2 package and APACI for PHP  
>> and
>> mod_perl)
>>  RT 3.4.5 with RTFM-2.2.0RC2.
>>
>>> From time to time one of the Apache processes simply bails out with the
>> following message: "Out of memory!" (This message is perl related)
>
>
> I think you need to track down what perl scripts are doing what when  
> this happens, using plenty of print statements (print to a log) perhaps  
> logging memory usage stats too.
>
> I once spent hours chasing an "Out of memory!" error.  I was reading a  
> very large file line by line.  Each line was only a few hundred chars  
> long so I couldn't see why it was eating so much memeory.  I Eventually  
> discovered that of the millions of lines in the file, 1 of them was  
> almost 400 million chars long!  The machine did not have enough memory  
> to fit the line into memory.
>
> Moral of the story is - I doubt Perl is at fault.
>
>
>

Thanks for the reply.


I did some more digging around and came up with the following:

http://guest:guest@rt.perl.org/rt3/index.html?q=37376

!!!!!!!!   It's a PERL BUG !! which should be fixed in perl 5.9.3.

But 5.9.3 is giving me a other problems with several modules....


-- 
Using Opera's revolutionary e-mail client: http://www.opera.com/mail/


------------------------------

Date: Fri, 07 Apr 2006 18:33:25 +0100
From: David Squire <David.Squire@infotech.monash.edu.au>
Subject: Namespace resolution question: I'm somewhat puzzled
Message-Id: <e167p5$5ep$1@news.ox.ac.uk>

Hi,

I am reorganizing some of my Perl code to place modules where they can 
be found via environment variable PERL5LIB. Some namespace issues are 
not working as I would have expected, and I have not been able to find a 
nice piece of documentation to explain this.

For example, consider this scenario:

I have directory MyLib (present in $PERL5LIB), which contains two 
subdirectories Foo and Bar. Foo contains a module FooTools.pm, and Bar 
contains BarTools.pm, i.e. the files MyLib/Foo/FooTools.pm and 
MyLib/Bar/BarTools.pm both exist.

In FooTools.pm, I have:

use Bar::BarTools;

Later in FooTools.pm, I want to use a function func() that lives in 
BarTools.pm. I expected this to work:

Bar::BarTools::func();

It did not, telling me that it could not find the function, though it is 
certainly present in MyLib/Bar/BarTools.pm. This, however, *did* work:

BarTools::func();

Why is it that 'Bar' must be present in the 'use' statement (as I would 
in fact expect), but cannot be present when I call the function? I would 
have expected a fully qualified name always to work.

What would happen if there were a module BarTools in Foo, and I had done 
this in FooTools.pm:

use Bar::BarTools;
use Foo::BarTools;
 ...
BarTools::func();

?

Would Bar::BarTools::func() work only if there were such a conflict?

Any help or pointers much appreciated.

Regards,

David



------------------------------

Date: Fri, 07 Apr 2006 09:13:40 -0500
From: Paul Urbanus <urbpublic@hotmail.com>
Subject: perlcc error - 'Can't unlink error file...'
Message-Id: <XO-dnQCI-KUD7qvZnZ2dnUVZ_tKdnZ2d@speakeasy.net>

Hi,

I'm a perl hack and want to distribute a windows executable of one of my 
scripts. When I invoke the perl compiler by using perlcc, I get the 
following error.

perlcc.bat: Can't unlink error file pccrYVGS

If I try multiple times, the error is the same but the filename changes.

I googled and didn't see anything that would help me.

One thing I did find out was that a recent installation of some 
development tools blew away portions of my 'path' environment variable, 
including the path to the perl bin directory (which also has 
perlcc.bat). I have restored this to the path and it works (I can invoke 
perlcc from any directory). However, I'm wondering if there is some 
other path element that needs to be in place to prevent this error.

Here's the particulars for my system.

Platform:    Windows 2000, SP4
Version:    ActiveState v5.6.1

TIA

Urb



------------------------------

Date: Fri, 7 Apr 2006 14:24:10 +0000 (UTC)
From: "A. Sinan Unur" <1usa@llenroc.ude.invalid>
Subject: Re: perlcc error - 'Can't unlink error file...'
Message-Id: <Xns979E69D1E966Basu1cornelledu@132.236.56.8>

Paul Urbanus <urbpublic@hotmail.com> wrote in news:XO-dnQCI-
KUD7qvZnZ2dnUVZ_tKdnZ2d@speakeasy.net:

> I'm a perl hack and want to distribute a windows executable of one of my 
> scripts. When I invoke the perl compiler by using perlcc, I get the 
> following error.
> 
> perlcc.bat: Can't unlink error file pccrYVGS
> 
> If I try multiple times, the error is the same but the filename changes.
> 
> I googled and didn't see anything that would help me.

Have you read the documentation for the tool you want to use?

DESCRIPTION
    perlcc creates standalone executables from Perl programs, using the
    code generators provided by the B module. At present, you may either
    create executable Perl bytecode, using the "-B" option, or generate and
    compile C files using the standard and 'optimised' C backends.

    The code generated in this way is not guaranteed to work. The whole
    codegen suite ("perlcc" included) should be considered very experimen-
    tal. Use for production purposes is strongly discouraged.

Try:

http://search.cpan.org/dist/PAR/

Sinan


------------------------------

Date: Fri, 7 Apr 2006 08:26:56 -0700
From: "Mothra" <mothra@nowhereatall.com>
Subject: Re: perlcc error - 'Can't unlink error file...'
Message-Id: <44368c5d$1@usenet.ugs.com>

Hi Paul,

Paul Urbanus wrote:
> Hi,
>
> I'm a perl hack and want to distribute a windows executable of one of
> my scripts.
(snipped)

You need to take a look at par for this

http://search.cpan.org/dist/PAR/

Hope this helps

Mothra 




------------------------------

Date: Fri, 7 Apr 2006 15:05:04 +0200
From: "Ferry Bolhar" <bol@adv.magwien.gv.at>
Subject: Re: XS progamming question
Message-Id: <1144415104.694875@proxy.dienste.wien.at>

Anno Siegel:

>> *a = 3;
> >
> > Which value the glob does contain after this command?
>
> 3 is stringified and used as a symref, so the effect is the same as
>
>     *a = *{ '3' };

Many thanks for the explantation! You mean, $a becomes an alias
for $3, @a for @3, %a for %3, and so on.

But what do you mean with "symref"?  I thought "*x" means "the
glob of the variable x".

>> And what exactly the ops 'gv', 'rv2gv' and 'rv2sv' will do?
>
>  What is "gv"?

I don't know, but try:

$ perl -Dt -e 'print @x'

and you'll see:
 ....
(-e:1) gv (main::x)
(-e:1) rv2av
(-e:1) print
 ....
Maybe "gv" returns a reference to the given glob, and "rv2av"
dereferences the array entry in order to pass the list to print?

Again, thanks for your answer, and kinfd greetings, Ferry

-- 
Ing. Ferry Bolhar
Municipality of Vienna, Department 14
A-1010 Vienna / AUSTRIA
E-mail: bol@adv.magwien.gv.at




------------------------------

Date: 7 Apr 2006 16:36:58 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: XS progamming question
Message-Id: <49nipaFplep1U1@news.dfncis.de>

Ferry Bolhar <bol@adv.magwien.gv.at> wrote in comp.lang.perl.misc:
> Anno Siegel:
> 
> >> *a = 3;
> > >
> > > Which value the glob does contain after this command?
> >
> > 3 is stringified and used as a symref, so the effect is the same as
> >
> >     *a = *{ '3' };
> 
> Many thanks for the explantation! You mean, $a becomes an alias
> for $3, @a for @3, %a for %3, and so on.

Quite so.

> But what do you mean with "symref"?  I thought "*x" means "the
> glob of the variable x".

That's true if x is a valid Perl identifier (a variable name without
the sigil $, %, ..., * in our case), which "3" isn't.

The general rule is:  The identifier can be substituted with a block
that returns a reference (of the right kind, if applicable).  The reference
can be a real one or a symbolic one.  Also, the block braces can be
dropped when there is no ambiguity.  That is what happens here.

Anno
-- 
If you want to post a followup via groups.google.com, don't use
the broken "Reply" link at the bottom of the article.  Click on 
"show options" at the top of the article, then click on the 
"Reply" at the bottom of the article headers.


------------------------------

Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin) 
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>


Administrivia:

#The Perl-Users Digest is a retransmission of the USENET newsgroup
#comp.lang.perl.misc.  For subscription or unsubscription requests, send
#the single line:
#
#	subscribe perl-users
#or:
#	unsubscribe perl-users
#
#to almanac@ruby.oce.orst.edu.  

NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice. 

To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.

#To request back copies (available for a week or so), send your request
#to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
#where x is the volume number and y is the issue number.

#For other requests pertaining to the digest, send mail to
#perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
#sending perl questions to the -request address, I don't have time to
#answer them even if I did know the answer.


------------------------------
End of Perl-Users Digest V10 Issue 9131
***************************************


home help back first fref pref prev next nref lref last post