[28810] in Perl-Users-Digest

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

Perl-Users Digest, Issue: 54 Volume: 11

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Jan 20 06:06:05 2007

Date: Sat, 20 Jan 2007 03:05:05 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)

Perl-Users Digest           Sat, 20 Jan 2007     Volume: 11 Number: 54

Today's topics:
        [OT] lucca70560 (was: Re: need help with the tr and s// <rvtol+news@isolution.nl>
    Re: [OT] lucca70560 <spamtrap@dot-app.org>
        explanation needed <anir.dr@gmail.com>
    Re: help problemes cgi and GD::Text <john.swilting@wanadoo.fr>
    Re: How to get the return codes for shell commands <asandstrom@accesswave.ca>
    Re: How to get the return codes for shell commands <spamtrap@dot-app.org>
    Re: How to get the return codes for shell commands <spamtrap@dot-app.org>
        HTTP::Proxy Error: "Getting request failed: Client clos jason.yfho@gmail.com
    Re: I/O open() <mmccaws@comcast.net>
    Re: I/O open() <mmccaws@comcast.net>
    Re: need help with the tr and s/// lucca70560@hotmail.com
    Re: need help with the tr and s/// <novafyre@hotmail.com>
    Re: need help with the tr and s/// <spamtrap@dot-app.org>
    Re: need help with the tr and s/// lucca70560@hotmail.com
    Re: need help with the tr and s/// <spamtrap@dot-app.org>
    Re: need help with the tr and s/// <bik.mido@tiscalinet.it>
    Re: need help with the tr and s/// <bik.mido@tiscalinet.it>
        new CPAN modules on Sat Jan 20 2007 (Randal Schwartz)
    Re: Perl hash and rehash seeds; deterministic hash orde (NOSPAM)
        Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)

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

Date: Sat, 20 Jan 2007 11:04:12 +0100
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: [OT] lucca70560 (was: Re: need help with the tr and s///)
Message-Id: <eostam.qg.1@news.isolution.nl>

lucca70560@hotmail.com schreef:
> Michele Dondi:

>>   ti tod nfni tod im tod mcl ta razalb
>>
>> (I hope you will decipher it, it's not that difficult - I won't post
>> it in any clearer form.)
>
> I figured it out: blazar(AT)lcm.mi.infn.it

> NNTP-Posting-Host: 202.108.119.227.

Public proxies are almost exclusively used by assholes, so they are easy
to filter.

-- 
Affijn, Ruud

"Gewoon is een tijger."



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

Date: Sat, 20 Jan 2007 05:41:07 -0500
From: Sherm Pendley <spamtrap@dot-app.org>
Subject: Re: [OT] lucca70560
Message-Id: <m2vej2x9oc.fsf@Sherm-Pendleys-Computer.local>

"Dr.Ruud" <rvtol+news@isolution.nl> writes:

> lucca70560@hotmail.com schreef:
>
>> NNTP-Posting-Host: 202.108.119.227.
>
> Public proxies are almost exclusively used by assholes, so they are easy
> to filter.

Thank you for the tip, I shall update my killfile appropriately. :-)

sherm--

-- 
Web Hosting by West Virginians, for West Virginians: http://wv-www.net
Cocoa programming in Perl: http://camelbones.sourceforge.net


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

Date: 20 Jan 2007 00:38:40 -0800
From: "anirban" <anir.dr@gmail.com>
Subject: explanation needed
Message-Id: <1169282320.411986.44280@l53g2000cwa.googlegroups.com>

dear all
  i am a beginner in perl.i am familiar with regex.but somewhere in the
net i hv found the following example which i cdnt understand.and there
was no explanation given in it.it would be very much helpful for me if
anyone kindly explain the following snippet of code.i understood what
it is actually doing.its jst retrieving the comma separated values frm
$text one by one.but i cdnt understand the regex part inside the while
loop inside the parse_csv subroutine.

    $text = q<XYZZY,"","O'Reilly, Inc","Wall, Larry","a \"glug\"
bit,",5,"Error, Core Dumped">;
    @new=&parse_csv($text);
    foreach(@new){
	print "$_\n";
    }

sub parse_csv {
    my $text = shift;      # record containing comma-separated values
    my @new  = ();
    push(@new, $+) while $text =~ m{
        "([^\"\\]*(?:\\.[^\"\\]*)*)",?
           |  ([^,]+),?
           | ,
       }gx;
       push(@new, undef) if substr($text, -1,1) eq ',';
       return @new;      # list of values that were comma-separated
}
                                  thanking you in advance

                                                                 anirban



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

Date: Sat, 20 Jan 2007 11:29:15 +0100
From: "john.swilting" <john.swilting@wanadoo.fr>
Subject: Re: help problemes cgi and GD::Text
Message-Id: <45b1eef2$0$27402$ba4acef3@news.orange.fr>

Simon Andrews wrote:

> john.swilting wrote:
>> How to use GD::Text
>> 
>  > The documentation says
>  >
>  >  my $gd_text = GD::Text->new(
>  >        text => 'Some text',
>  >        font => 'funny.ttf',
>  >        ptsize => 14,
>  >    );
>> And I have
>> 
>> 
>> # create a new
>> 
>> my $im = new GD::Image(100,100);
> 
> [snip]
> 
>> print $q->header( -type => "image/png", -expires => "-1d");
>> binmode STDOUT;
>> print $im->png
>> 
>> How to make
>> So that both work together
> 
> I have to say that looking at the POD for GD::Text it's not at all
> obvious!  However if you look in the demos directory of the GD::Text
> module there is a nice example of how to do it
> 
> http://search.cpan.org/src/MVERB/GDTextUtil-0.86/demo/GDWrap.pl
> 
> Basically
> 
> my $gd = GD::Image->new(400,240);
> 
> my $wp = GD::Text::Wrap->new($gd,
>      width       => 180,
>      line_space  => 4,t
>      color       => $black,
>      text        => $text,
> );
> 
> $gd->rectangle($wp->get_bounds(10,10), $blue);
> $wp->draw(10,10);
> 
> binmode STDOUT ;
> print STDOUT $gd->png();

its ok
that code compil nice
I am going to look a doc To continue
#!/usr/bin/perl -w

use strict;
use diagnostics;
use GD;
use GD::Text;
use GD::Text::Wrap;
use CGI;
use CGI::Carp;

my $q = new CGI;


# create a new

my $im = new GD::Image(100,100);

# allocate some colors
my $white = $im->colorAllocate(255,255,255);
my $black = $im->colorAllocate(0,0,0);
my $red = $im->colorAllocate(255,0,0);
my $blue = $im->colorAllocate(0,0,255);

# make the background tra $im_pngnsparent and interlaced
$im->transparent($white);
$im->interlaced('true');

# put a black frame around the picture
$im->rectangle(0,0,99,99,$black);

# draw a blue oval
$im->arc(50,50,95,75,0,360,$blue);

# and fill it with red
$im->fill(50,50,$red);


my $text = "ok";

my $wp = GD::Text::Wrap->new ( $im,
                               width => 180,
                               line_space => 4,
                               color => $black,
                               text => $text,
                             );
$im->rectangle ( $wp->get_bounds(10,10), $blue);
$wp->draw(10,10);

print $q->header( -type => "image/png", -expires => "-1d");
binmode STDOUT;
print STDOUT $im->png


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

Date: Sat, 20 Jan 2007 07:44:35 GMT
From: "Arved Sandstrom" <asandstrom@accesswave.ca>
Subject: Re: How to get the return codes for shell commands
Message-Id: <DLjsh.171273$hn.136175@edtnps82>

"Paul Lalli" <mritty@gmail.com> wrote in message 
news:1169212545.302416.213400@m58g2000cwm.googlegroups.com...
> vabby wrote:
>> Also for most of teh common commands the result code is 0. Is it also
>> true for other commands like rsync etc.
>
> Yes, and?  What is making you believe the result code should *not* be
> 0?  The vast majority of applications return 0 to indicate success.

Paul (and your tone is similar to the problem I have with Abigail), consider 
this: a zero return is common with UNIX commands to indicate success. It is 
*NOT* common in many programming paradigms that perhaps these posters are 
used to, where you look for failure with a zero or FALSE. Depending on how 
you define "application", it may well be that the vast majority of 
"applications" do _not_ return 0 to indicate success; it's more natural to 
return a non-zero.

But then again, we'd be talking non-UNIX, and of course everyone out there 
is a UNIX guru.

AHS 




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

Date: Sat, 20 Jan 2007 03:02:06 -0500
From: Sherm Pendley <spamtrap@dot-app.org>
Subject: Re: How to get the return codes for shell commands
Message-Id: <m27iviyvlt.fsf@Sherm-Pendleys-Computer.local>

"Arved Sandstrom" <asandstrom@accesswave.ca> writes:

> But then again, we'd be talking non-UNIX, and of course everyone out there 
> is a UNIX guru.

Are you saying that only UNIX gurus are capable of reading the docs for the
tools they're using, to see what status codes indicate success?

Are you saying that we should all assume that Windows users are illiterate,
and just spoon-feed them the docs they're all incapable of reading?

My, you do seem to have an exceptionally low opinion of Windows users. Why
is that? Did Bill Gates kick your dog or something?

sherm--

-- 
Web Hosting by West Virginians, for West Virginians: http://wv-www.net
Cocoa programming in Perl: http://camelbones.sourceforge.net


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

Date: Sat, 20 Jan 2007 03:13:44 -0500
From: Sherm Pendley <spamtrap@dot-app.org>
Subject: Re: How to get the return codes for shell commands
Message-Id: <m2zm8exghz.fsf@Sherm-Pendleys-Computer.local>

"Arved Sandstrom" <asandstrom@accesswave.ca> writes:

> "Paul Lalli" <mritty@gmail.com> wrote in message 
> news:1169212545.302416.213400@m58g2000cwm.googlegroups.com...
>>
>> Yes, and?  What is making you believe the result code should *not* be
>> 0?  The vast majority of applications return 0 to indicate success.
>
> Paul (and your tone is similar to the problem I have with Abigail), consider 
> this: a zero return is common with UNIX commands to indicate success.

Yeah, UNIX commands such as these:

vabby wrote:
> I am writing a perl script in which I am using some commnds like, mv,
> rcp, rsync, rm etc.

I seem to recall you had exactly the same problem a few days ago - you ripped
into Abigail for posting a "UNIX-y" answer, when it turned out that the shell
command he was commenting on used quoting that wouldn't work on Windows, or
in other words, it turned out that a UNIX-y answer was exactly what was called
for.

Here's a suggestion for you: The next time you find yourself getting upset
because someone "assumed" UNIX, take a closer look, and see if maybe there
happens to be a Very Good Reason they're giving a UNIX-y answer.

sherm--

-- 
Web Hosting by West Virginians, for West Virginians: http://wv-www.net
Cocoa programming in Perl: http://camelbones.sourceforge.net


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

Date: 19 Jan 2007 20:25:19 -0800
From: jason.yfho@gmail.com
Subject: HTTP::Proxy Error: "Getting request failed: Client closed"
Message-Id: <1169267119.488879.263890@s34g2000cwa.googlegroups.com>

Dear All,

I installed HTTP::Proxy 0.20 version.
(http://search.cpan.org/dist/HTTP-Proxy/)

I run the proxy in my Fedora 3 with the following config to support a
very high traffic:

$proxy->max_clients(500);
$proxy->max_keep_alive_requests(40);

I found that when the proxy is running, there will be quite often
display such an error message:
[Sat Jan 20 11:50:02 2007] (13681) ERROR: Getting request failed:
Client closed

What's the meaning of it and will that child process exit when faced
such an error? Or the child process will continue to accept other
connections until connection no. reached max_keep_alive_requests?

Thank you very much.

Rgds,
Jason



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

Date: 19 Jan 2007 19:40:50 -0800
From: "mmccaws2" <mmccaws@comcast.net>
Subject: Re: I/O open()
Message-Id: <1169264450.449443.152360@s34g2000cwa.googlegroups.com>


Sherm Pendley wrote:
> "mmccaws2" <mmccaws@comcast.net> writes:
>
> > So when I get home I'll try those suggestions.  However, would it be
> > best for
> > me to uninstall all Net modules that I've attempted to install and
> > start fresh?
>
> No need - CPAN checks for older versions and will upgrade as needed.
>
> > I think that what got me into this mess
> > is my lack of understanding modules, since this is my first adventure
> > into using them.
> >
> > I chose that older one since it was mentioned in some article that
> > mentioned that author.
>
> That must have been an old article. Modules can and often do pass from one
> maintainer to another. (According to the docs at the bottom of Net::DNS's
> POD, Olaf is actually its *third* maintainer.)
>
> > In this list there are two Net-DNS only modules and many Net-DNS-XXXX
> > modules.  Are the latter, -XXX
> > named modules essentially a subset modules of Net-DNS or are they an
> > independent development module with completely different methods, in
> > other words developed from the same core module?
>
> Neither. Net::DNS is just a name space. Module name spaces are chosen by
> subject matter - they have nothing at all to do with who created them or
> whether they happen to share any code or not.
>
> If you need the Net::DNS module, then a simple "install Net::DNS" in the
> CPAN shell should fetch the latest version of it - you don't need to know
> or care about what specific version that is, or who the current maintainer
> happens to be.
>
> > So it might be best to remove and search out the latest of each of the
> > dependencies.
>
> No, what's best is to forget about managing dependencies at all. Let the
> CPAN module do that for you - that's what it's for.
>
> sherm--
>
> --
> Web Hosting by West Virginians, for West Virginians: http://wv-www.net
> Cocoa programming in Perl: http://camelbones.sourceforge.net


here is
perl -le 'print for @INC'
/System/Library/Perl/5.8.6/darwin-thread-multi-2level
/System/Library/Perl/5.8.6
/Library/Perl/5.8.6/darwin-thread-multi-2level
/Library/Perl/5.8.6
/Library/Perl
/Network/Library/Perl/5.8.6/darwin-thread-multi-2level
/Network/Library/Perl/5.8.6
/Network/Library/Perl
/System/Library/Perl/Extras/5.8.6/darwin-thread-multi-2level
/System/Library/Perl/Extras/5.8.6
/Library/Perl/5.8.1

I'm going to do some research on these modules.

Mike



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

Date: 20 Jan 2007 00:21:11 -0800
From: "mmccaws2" <mmccaws@comcast.net>
Subject: Re: I/O open()
Message-Id: <1169281271.486216.235360@q2g2000cwa.googlegroups.com>


mmccaws2 wrote:
> Sherm Pendley wrote:
> > "mmccaws2" <mmccaws@comcast.net> writes:
> >
> > > So when I get home I'll try those suggestions.  However, would it be
> > > best for
> > > me to uninstall all Net modules that I've attempted to install and
> > > start fresh?
> >
> > No need - CPAN checks for older versions and will upgrade as needed.
> >
> > > I think that what got me into this mess
> > > is my lack of understanding modules, since this is my first adventure
> > > into using them.
> > >
> > > I chose that older one since it was mentioned in some article that
> > > mentioned that author.
> >
> > That must have been an old article. Modules can and often do pass from one
> > maintainer to another. (According to the docs at the bottom of Net::DNS's
> > POD, Olaf is actually its *third* maintainer.)
> >
> > > In this list there are two Net-DNS only modules and many Net-DNS-XXXX
> > > modules.  Are the latter, -XXX
> > > named modules essentially a subset modules of Net-DNS or are they an
> > > independent development module with completely different methods, in
> > > other words developed from the same core module?
> >
> > Neither. Net::DNS is just a name space. Module name spaces are chosen by
> > subject matter - they have nothing at all to do with who created them or
> > whether they happen to share any code or not.
> >
> > If you need the Net::DNS module, then a simple "install Net::DNS" in the
> > CPAN shell should fetch the latest version of it - you don't need to know
> > or care about what specific version that is, or who the current maintainer
> > happens to be.
> >
> > > So it might be best to remove and search out the latest of each of the
> > > dependencies.
> >
> > No, what's best is to forget about managing dependencies at all. Let the
> > CPAN module do that for you - that's what it's for.
> >
> > sherm--
> >
> > --
> > Web Hosting by West Virginians, for West Virginians: http://wv-www.net
> > Cocoa programming in Perl: http://camelbones.sourceforge.net
>
>
> here is
> perl -le 'print for @INC'
> /System/Library/Perl/5.8.6/darwin-thread-multi-2level
> /System/Library/Perl/5.8.6
> /Library/Perl/5.8.6/darwin-thread-multi-2level
> /Library/Perl/5.8.6
> /Library/Perl
> /Network/Library/Perl/5.8.6/darwin-thread-multi-2level
> /Network/Library/Perl/5.8.6
> /Network/Library/Perl
> /System/Library/Perl/Extras/5.8.6/darwin-thread-multi-2level
> /System/Library/Perl/Extras/5.8.6
> /Library/Perl/5.8.1
>
> I'm going to do some research on these modules.
>
> Mike


Thanks for the help and the humour.  Net::DNS now works.  I went back
and installed those modules that we're already installed.

Mike



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

Date: 19 Jan 2007 19:28:46 -0800
From: lucca70560@hotmail.com
Subject: Re: need help with the tr and s///
Message-Id: <1169263726.183992.270880@51g2000cwl.googlegroups.com>


Michele Dondi wrote:
> On Fri, 19 Jan 2007 07:21:26 -0700, Mark Donovan
> <novafyre@hotmail.com> wrote:
>
> >Dondi,
> >
> >It's unfortunate that your e-mail address doesn't work.
> >
> >Delivery to the following recipient failed permanently:
> >
> >     bik.mido@tiscalinet.it
>
> Well, I strongly prefer to keep the discussion public, but if you
> really want to you can write me at
>
>   ti tod nfni tod im tod mcl ta razalb
>
> (I hope you will decipher it, it's not that difficult - I won't post
> it in any clearer form.)

I figured it out: blazar@lcm.mi.infn.it



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

Date: Fri, 19 Jan 2007 20:37:16 -0700
From: Mark Donovan <novafyre@hotmail.com>
Subject: Re: need help with the tr and s///
Message-Id: <C1D6DC7C.972C%novafyre@hotmail.com>

On 1/19/07 20:28, "lucca70560@hotmail.com" <lucca70560@hotmail.com> wrote:

> 
> Michele Dondi wrote:
>> On Fri, 19 Jan 2007 07:21:26 -0700, Mark Donovan
>> <novafyre@hotmail.com> wrote:
>> 
>>> Dondi,
>>> 
>>> It's unfortunate that your e-mail address doesn't work.
>>> 
>>> Delivery to the following recipient failed permanently:
>>> 
>>>     bik.mido@tiscalinet.it
>> 
>> Well, I strongly prefer to keep the discussion public, but if you
>> really want to you can write me at
>> 
>>   ti tod nfni tod im tod mcl ta razalb
>> 
>> (I hope you will decipher it, it's not that difficult - I won't post
>> it in any clearer form.)
> 
> I figured it out: blazar@lcm.mi.infn.it
> 
Ah, thanks! I have no interest in crypto games. That's cool.

-- 
Mark




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

Date: Fri, 19 Jan 2007 22:45:58 -0500
From: Sherm Pendley <spamtrap@dot-app.org>
Subject: Re: need help with the tr and s///
Message-Id: <m2fya6z7gp.fsf@Sherm-Pendleys-Computer.local>

lucca70560@hotmail.com writes:

> Michele Dondi wrote:
>>
>> Well, I strongly prefer to keep the discussion public, but if you
>> really want to you can write me at
>>
>>   ti tod nfni tod im tod mcl ta razalb
>>
>> (I hope you will decipher it, it's not that difficult - I won't post
>> it in any clearer form.)
>
> I figured it out: ***************

Yeah, that was the idea - any human with two working brain cells can easily
figure it out, but it's not sitting there in the clear for spambots to
harvest.

Anyone with an ounce of courtesy would have respected Michele's decision
to keep his address munged against automated spam harvesters. Reposting it
in the clear was the act of a petulant child. Grow up.

sherm--

-- 
Web Hosting by West Virginians, for West Virginians: http://wv-www.net
Cocoa programming in Perl: http://camelbones.sourceforge.net


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

Date: 19 Jan 2007 20:36:25 -0800
From: lucca70560@hotmail.com
Subject: Re: need help with the tr and s///
Message-Id: <1169267785.573971.116450@51g2000cwl.googlegroups.com>


Sherm Pendley wrote:
> lucca70560@hotmail.com writes:
>
> > Michele Dondi wrote:
> >>
> >> Well, I strongly prefer to keep the discussion public, but if you
> >> really want to you can write me at
> >>
> >>   ti tod nfni tod im tod mcl ta razalb
> >>
> >> (I hope you will decipher it, it's not that difficult - I won't post
> >> it in any clearer form.)
> >
> > I figured it out: blazar@lcm.mi.infn.it
>
> Yeah, that was the idea - any human with two working brain cells can easily
> figure it out, but it's not sitting there in the clear for spambots to
> harvest.
>
> Anyone with an ounce of courtesy would have respected Michele's decision
> to keep his address munged against automated spam harvesters. Reposting it
> in the clear was the act of a petulant child. Grow up.

Anyone with an ounce of courtesy would have used a real email address,
so those of us that want to ask further questions in email could
actually reach her.

> Web Hosting by West Virginians, for West Virginians: http://wv-www.net

West Virginia has computers???



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

Date: Sat, 20 Jan 2007 00:12:55 -0500
From: Sherm Pendley <spamtrap@dot-app.org>
Subject: Re: need help with the tr and s///
Message-Id: <m2bqkuz3fs.fsf@Sherm-Pendleys-Computer.local>

lucca70560@hotmail.com writes:

> Sherm Pendley wrote:
>>
>> Anyone with an ounce of courtesy would have respected Michele's decision
>> to keep his address munged against automated spam harvesters. Reposting it
>> in the clear was the act of a petulant child. Grow up.
>
> Anyone with an ounce of courtesy would have used a real email address,
> so those of us that want to ask further questions in email could
> actually reach her.

Michele is male - or at least I assume so, seeing as how most people who
wear a beard and moustache are of that gender, and "Michele" is an Italian
form of "Michael".

Anyhow, *he* did provide a real email address, in a form that any human with
two working brain cells could use to reach *him*. De-munging it and reposting
it in plain text for the sole benefit of spam-bots was not only unnecessary,
it was petty, spiteful, and childish.

So like I said - grow up.

sherm--

-- 
Web Hosting by West Virginians, for West Virginians: http://wv-www.net
Cocoa programming in Perl: http://camelbones.sourceforge.net


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

Date: Sat, 20 Jan 2007 11:56:58 +0100
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: need help with the tr and s///
Message-Id: <2bt3r21r01sb8fri7hefgtcnecv0v2j1no@4ax.com>

On 19 Jan 2007 20:36:25 -0800, lucca70560@hotmail.com wrote:

>Anyone with an ounce of courtesy would have used a real email address,
>so those of us that want to ask further questions in email could
>actually reach her.

s/her/him/;  # please!


Michele
-- 
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
 .'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,


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

Date: Sat, 20 Jan 2007 11:58:29 +0100
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: need help with the tr and s///
Message-Id: <pct3r2h78cf3ovdip0tk4kuush3gotjuv3@4ax.com>

On 19 Jan 2007 19:28:46 -0800, lucca70560@hotmail.com wrote:

>> (I hope you will decipher it, it's not that difficult - I won't post
>> it in any clearer form.)
>
>I figured it out: xxxxxx@xxx.xx.xxxx.xx

TY! (I'm being sarcastic, for the record...)


Michele
-- 
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
 .'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,


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

Date: Sat, 20 Jan 2007 05:42:08 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Sat Jan 20 2007
Message-Id: <JC5Ju8.nqy@zorch.sf-bay.org>

The following modules have recently been added to or updated in the
Comprehensive Perl Archive Network (CPAN).  You can install them using the
instructions in the 'perlmodinstall' page included with your Perl
distribution.

Apache-Voodoo-2.01
http://search.cpan.org/~maverick/Apache-Voodoo-2.01/
or just Voodoo for short; is a web application framework for Apache 1.3 and 2.0
----
Coro-3.4
http://search.cpan.org/~mlehmann/Coro-3.4/
coroutine process abstraction
----
HTML-BBCode-1.06
http://search.cpan.org/~blom/HTML-BBCode-1.06/
Perl extension for converting BBcode to HTML.
----
HTML-TreeBuilder-XPath-0.08
http://search.cpan.org/~mirod/HTML-TreeBuilder-XPath-0.08/
add XPath support to HTML::TreeBuilder
----
HTTP-Server-Simple-0.27
http://search.cpan.org/~jesse/HTTP-Server-Simple-0.27/
Lightweight HTTP server
----
Imager-DTP-0.06
http://search.cpan.org/~bashi/Imager-DTP-0.06/
draw text with DTP app-like custom options
----
Mail-SPF-2.004
http://search.cpan.org/~jmehnle/Mail-SPF-2.004/
An object-oriented implementation of Sender Policy Framework
----
Math-Symbolic-0.506
http://search.cpan.org/~smueller/Math-Symbolic-0.506/
Symbolic calculations
----
Math-SymbolicX-Complex-1.00
http://search.cpan.org/~smueller/Math-SymbolicX-Complex-1.00/
Complex number support for the Math::Symbolic parser
----
Math-SymbolicX-ParserExtensionFactory-2.00
http://search.cpan.org/~smueller/Math-SymbolicX-ParserExtensionFactory-2.00/
Generate parser extensions
----
MooseX-Object-Pluggable-0.0003
http://search.cpan.org/~groditi/MooseX-Object-Pluggable-0.0003/
Make your classes pluggable
----
Mozilla-ConsoleService-0.03
http://search.cpan.org/~bosu/Mozilla-ConsoleService-0.03/
Perl interface to Mozilla nsIConsoleService
----
Mozilla-DOM-ComputedStyle-0.02
http://search.cpan.org/~bosu/Mozilla-DOM-ComputedStyle-0.02/
Interface to Mozilla getComputedStyle function.
----
Mozilla-ObserverService-0.03
http://search.cpan.org/~bosu/Mozilla-ObserverService-0.03/
Perl interface to the Mozilla nsIObserverService
----
Mozilla-PromptService-0.03
http://search.cpan.org/~bosu/Mozilla-PromptService-0.03/
Perl interface to the Mozilla nsIPromptService
----
Mozilla-SourceViewer-0.03
http://search.cpan.org/~bosu/Mozilla-SourceViewer-0.03/
Perl extension to get current page source.
----
POE-Component-Server-SimpleContent-1.04
http://search.cpan.org/~bingos/POE-Component-Server-SimpleContent-1.04/
The easy way to serve web content with POE::Component::Server::SimpleHTTP.
----
PPM-Profile-1.4
http://search.cpan.org/~gozer/PPM-Profile-1.4/
----
Spreadsheet-WriteExcel-2.18
http://search.cpan.org/~jmcnamara/Spreadsheet-WriteExcel-2.18/
Write to a cross-platform Excel binary file.
----
Test-Mock-LWP-0.01
http://search.cpan.org/~lukec/Test-Mock-LWP-0.01/
Easy mocking of LWP packages
----
Test-Mock-LWP-0.02
http://search.cpan.org/~lukec/Test-Mock-LWP-0.02/
Easy mocking of LWP packages
----
Tk-CanvasLogo-0.1
http://search.cpan.org/~gslondon/Tk-CanvasLogo-0.1/
a Tk::Canvas widget that can support methods based on the Logo Programming Language as well as multiple turtles.
----
Tk-CanvasLogo-0.2
http://search.cpan.org/~gslondon/Tk-CanvasLogo-0.2/
a Tk::Canvas widget that can support methods based on the Logo Programming Language as well as multiple turtles.
----
URI-Escape-JavaScript-0.01
http://search.cpan.org/~taniguchi/URI-Escape-JavaScript-0.01/
A perl implementation of JavaScript's escape() and unescape() functions
----
WWW-Baidu-0.01
http://search.cpan.org/~agent/WWW-Baidu-0.01/
Perl interface for the www.baidu.com search engine
----
WWW-Baidu-0.02
http://search.cpan.org/~agent/WWW-Baidu-0.02/
Perl interface for the www.baidu.com search engine
----
WWW-Baidu-0.03
http://search.cpan.org/~agent/WWW-Baidu-0.03/
Perl interface for the www.baidu.com search engine
----
WWW-Baidu-0.04
http://search.cpan.org/~agent/WWW-Baidu-0.04/
Perl interface for the www.baidu.com search engine
----
WWW-Moreshet-0.01
http://search.cpan.org/~szabgab/WWW-Moreshet-0.01/
Interface to www.moreshet.co.il
----
WebService-Validator-CSS-W3C-0.2
http://search.cpan.org/~oliviert/WebService-Validator-CSS-W3C-0.2/
Interface to the W3C CSS Validator
----
WebService-Validator-Feed-W3C-0.5
http://search.cpan.org/~oliviert/WebService-Validator-Feed-W3C-0.5/
Interface to the W3C Feed Validation service
----
Win32-Process-Info-1.008
http://search.cpan.org/~wyant/Win32-Process-Info-1.008/
Provide process information for Windows 32 systems.
----
XML-XPathEngine-0.08
http://search.cpan.org/~mirod/XML-XPathEngine-0.08/
a re-usable XPath engine for DOM-like trees
----
ack-1.58
http://search.cpan.org/~petdance/ack-1.58/
grep-like text finder


If you're an author of one of these modules, please submit a detailed
announcement to comp.lang.perl.announce, and we'll pass it along.

This message was generated by a Perl program described in my Linux
Magazine column, which can be found on-line (along with more than
200 other freely available past column articles) at
  http://www.stonehenge.com/merlyn/LinuxMag/col82.html

print "Just another Perl hacker," # the original

--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!


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

Date: Fri, 19 Jan 2007 23:49:41 -0600
From: "Mumia W. (NOSPAM)" <paduille.4060.mumia.w+nospam@earthlink.net>
Subject: Re: Perl hash and rehash seeds; deterministic hash ordering
Message-Id: <eoscjr$jba$1@aioe.org>

On 01/19/2007 04:01 PM, ozgune@gmail.com wrote:
> Hi -
> 
> I just upgraded to Perl 5.8.6, and am evaluating the effect of random
> hash ordering on my systems. Surprisingly, I seem *unaffected* by Perl
> hash seeds (The following is a RHEL 3 box).
> 
> % perl -v
> This is perl, v5.8.6 built for Linux-2.4c2.3-i686-64int
> 
> % perl -le '@a="a".."z";@a{@a}=();print keys %a'
> HASH_SEED = 10308426221955932222
> wraxdjyukhgftienvmslcpqbzo
> 
> % perl -le '@a="a".."z";@a{@a}=();print keys %a'
> HASH_SEED = 2190859344420079461
> wraxdjyukhgftienvmslcpqbzo
> [...]

FWIW, I'm getting the same behavior on Debian 3.1 i386 and Perl 5.9.4.


-- 
Windows Vista and your freedom in conflict:
http://www.regdeveloper.co.uk/2006/10/29/microsoft_vista_eula_analysis/


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

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 V11 Issue 54
*************************************


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