[31246] in Perl-Users-Digest
Perl-Users Digest, Issue: 2491 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Jun 25 03:09:46 2009
Date: Thu, 25 Jun 2009 00:09:12 -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 Thu, 25 Jun 2009 Volume: 11 Number: 2491
Today's topics:
dup hash ref in array <noboey@home.com>
Re: dup hash ref in array <tadmc@seesig.invalid>
Re: dup hash ref in array <noboey@home.com>
Re: dup hash ref in array <ben@morrow.me.uk>
Re: dup hash ref in array <ben@morrow.me.uk>
Re: dup hash ref in array <noboey@home.com>
Re: dup hash ref in array <ben@morrow.me.uk>
Re: dup hash ref in array sln@netherlands.com
Re: dup hash ref in array <xhoster@gmail.com>
Re: dup hash ref in array sln@netherlands.com
Gifting Knowledge <syeda.nida.manzar@gmail.com>
Re: matching two strings sln@netherlands.com
Re: Multiple server find and replace <tzz@lifelogs.com>
new CPAN modules on Thu Jun 25 2009 (Randal Schwartz)
talk of concurrency by Anders Hejlsberg and Guy Steele <xahlee@gmail.com>
Wide Finder results <cartercc@gmail.com>
XML Parser <tazwin1@yahoo.com>
Re: XML Parser sln@netherlands.com
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 24 Jun 2009 14:20:07 -0400
From: monkeys paw <noboey@home.com>
Subject: dup hash ref in array
Message-Id: <tpudneYozbjL89_XnZ2dnUVZ_qGdnZ2d@insightbb.com>
This code:
my @x;
my $y;
$y = {xxx => 1, yyy => 2, zzz => 3};
for (1..3) {
push @x, $y;
}
use Data::Dumper;die Dumper(\@x);
Produces THIS:
$VAR1 = [
{
'xxx' => 1,
'yyy' => 2,
'zzz' => 3
},
$VAR1->[0],
$VAR1->[0]
];
------------------------------
Date: Wed, 24 Jun 2009 13:52:32 -0500
From: Tad J McClellan <tadmc@seesig.invalid>
Subject: Re: dup hash ref in array
Message-Id: <slrnh44tab.1gl.tadmc@tadmc30.sbcglobal.net>
monkeys paw <noboey@home.com> wrote:
> This code:
>
>
> my @x;
> my $y;
>
> $y = {xxx => 1, yyy => 2, zzz => 3};
>
> for (1..3) {
> push @x, $y;
> }
>
> use Data::Dumper;die Dumper(\@x);
>
> Produces THIS:
>
> $VAR1 = [
> {
> 'xxx' => 1,
> 'yyy' => 2,
> 'zzz' => 3
> },
> $VAR1->[0],
> $VAR1->[0]
> ];
Yes it does.
What about it?
(did you read the 3rd paragraph of the docs for the module
that you are using?)
--
Tad McClellan
email: perl -le "print scalar reverse qq/moc.noitatibaher\100cmdat/"
------------------------------
Date: Wed, 24 Jun 2009 14:56:32 -0400
From: monkeys paw <noboey@home.com>
Subject: Re: dup hash ref in array
Message-Id: <evednTRm879C69_XnZ2dnUVZ_oZi4p2d@insightbb.com>
Tad J McClellan wrote:
> monkeys paw <noboey@home.com> wrote:
>> This code:
>>
>>
>> my @x;
>> my $y;
>>
>> $y = {xxx => 1, yyy => 2, zzz => 3};
>>
>> for (1..3) {
>> push @x, $y;
>> }
>>
>> use Data::Dumper;die Dumper(\@x);
>>
>> Produces THIS:
>>
>> $VAR1 = [
>> {
>> 'xxx' => 1,
>> 'yyy' => 2,
>> 'zzz' => 3
>> },
>> $VAR1->[0],
>> $VAR1->[0]
>> ];
>
>
> Yes it does.
>
> What about it?
>
>
> (did you read the 3rd paragraph of the docs for the module
> that you are using?)
>
>
I want the output to be this:
$VAR1 = [
{
'xxx' => 1,
'yyy' => 2,
'zzz' => 3
},
{
'xxx' => 1,
'yyy' => 2,
'zzz' => 3
},
{
'xxx' => 1,
'yyy' => 2,
'zzz' => 3
},
];
------------------------------
Date: Wed, 24 Jun 2009 19:45:46 +0100
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: dup hash ref in array
Message-Id: <qr8ah6-g7l.ln1@osiris.mauzo.dyndns.org>
Quoth monkeys paw <noboey@home.com>:
> This code:
>
> my @x;
> my $y;
>
> $y = {xxx => 1, yyy => 2, zzz => 3};
>
> for (1..3) {
> push @x, $y;
> }
>
> use Data::Dumper;die Dumper(\@x);
>
> Produces THIS:
>
> $VAR1 = [
> {
> 'xxx' => 1,
> 'yyy' => 2,
> 'zzz' => 3
> },
> $VAR1->[0],
> $VAR1->[0]
> ];
...and your question is?
That is exactly what I would expect it to produce. What were you
expecting?
Ben
------------------------------
Date: Wed, 24 Jun 2009 20:15:37 +0100
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: dup hash ref in array
Message-Id: <pjaah6-4hl.ln1@osiris.mauzo.dyndns.org>
Quoth monkeys paw <noboey@home.com>:
> Tad J McClellan wrote:
> > monkeys paw <noboey@home.com> wrote:
> >> This code:
> >>
> >>
> >> my @x;
> >> my $y;
> >>
> >> $y = {xxx => 1, yyy => 2, zzz => 3};
> >>
> >> for (1..3) {
> >> push @x, $y;
> >> }
> >>
> >> use Data::Dumper;die Dumper(\@x);
> >>
> >> Produces THIS:
> >
<snip>
> I want the output to be this:
>
> $VAR1 = [
> {
> 'xxx' => 1,
> 'yyy' => 2,
> 'zzz' => 3
> },
> {
> 'xxx' => 1,
> 'yyy' => 2,
> 'zzz' => 3
> },
<snip>
You need to copy the hash, rather than simply pushing a reference to it.
push @x, { %$y };
Ben
------------------------------
Date: Wed, 24 Jun 2009 22:23:12 -0400
From: monkeys paw <noboey@home.com>
Subject: Re: dup hash ref in array
Message-Id: <hIOdndKMlZsNQt_XnZ2dnUVZ_hydnZ2d@insightbb.com>
Ben Morrow wrote:
> Quoth monkeys paw <noboey@home.com>:
>> This code:
>>
>> my @x;
>> my $y;
>>
>> $y = {xxx => 1, yyy => 2, zzz => 3};
>>
>> for (1..3) {
>> push @x, $y;
>> }
>>
>> use Data::Dumper;die Dumper(\@x);
>>
>> Produces THIS:
>>
>> $VAR1 = [
>> {
>> 'xxx' => 1,
>> 'yyy' => 2,
>> 'zzz' => 3
>> },
>> $VAR1->[0],
>> $VAR1->[0]
>> ];
>
> ...and your question is?
>
> That is exactly what I would expect it to produce. What were you
> expecting?
>
> Ben
>
My question would be then, why does data::dumper show $var1->[0],
instead of the values? The array exists as i expected, i was
thrown by data::dumper interpretation.
------------------------------
Date: Thu, 25 Jun 2009 03:51:07 +0100
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: dup hash ref in array
Message-Id: <r95bh6-q9q.ln1@osiris.mauzo.dyndns.org>
Quoth monkeys paw <noboey@home.com>:
> Ben Morrow wrote:
> > Quoth monkeys paw <noboey@home.com>:
> >>
> >> $VAR1 = [
> >> {
> >> 'xxx' => 1,
> >> 'yyy' => 2,
> >> 'zzz' => 3
> >> },
> >> $VAR1->[0],
> >> $VAR1->[0]
> >> ];
> >
> > ...and your question is?
> >
> > That is exactly what I would expect it to produce. What were you
> > expecting?
> >
> My question would be then, why does data::dumper show $var1->[0],
> instead of the values? The array exists as i expected, i was
> thrown by data::dumper interpretation.
As Tad said, you need to read the docs for Data::Dumper. You also need
to read perldoc perlreftut until you understand it.
Something that might help: consider the output of this:
my $href = { a => 1 };
my @ary = ($href, $href);
warn $ary[0]{a};
$ary[1]{a} = 2;
warn $ary[0]{a};
Ben
------------------------------
Date: Wed, 24 Jun 2009 22:28:59 -0700
From: sln@netherlands.com
Subject: Re: dup hash ref in array
Message-Id: <942645t3bvvtnao1d3avim8kae0vqk4kes@4ax.com>
On Wed, 24 Jun 2009 14:20:07 -0400, monkeys paw <noboey@home.com> wrote:
>This code:
>
>
>my @x;
>my $y;
>
>$y = {xxx => 1, yyy => 2, zzz => 3};
>
>for (1..3) {
> push @x, $y;
>}
>
>use Data::Dumper;die Dumper(\@x);
>
>Produces THIS:
>
>$VAR1 = [
> {
> 'xxx' => 1,
> 'yyy' => 2,
> 'zzz' => 3
> },
> $VAR1->[0],
> $VAR1->[0]
> ];
I have only read your post (not anybody's responses).
I must say this is how I want Dumper to respond.
It sees three identical hash references in the array @x.
As a developer, I want to see any duplicate references.
This tells me what the real contents of a structure is.
Thats all it tells me, and thats all I want to know.
It is recursively itterating for a visual heads-up.
In real life, you do your own deep recursions and its
just a mirror, just a check. How you handle it is something
different.
-sln
------------------------------
Date: Wed, 24 Jun 2009 20:04:10 -0700
From: Xho Jingleheimerschmidt <xhoster@gmail.com>
Subject: Re: dup hash ref in array
Message-Id: <4a430b7e$0$13872$ed362ca5@nr5-q3a.newsreader.com>
Ben Morrow wrote:
> Quoth monkeys paw <noboey@home.com>:
>> Tad J McClellan wrote:
>>> monkeys paw <noboey@home.com> wrote:
>>>> This code:
>>>>
>>>>
>>>> my @x;
>>>> my $y;
>>>>
>>>> $y = {xxx => 1, yyy => 2, zzz => 3};
>>>>
>>>> for (1..3) {
>>>> push @x, $y;
>>>> }
>>>>
>>>> use Data::Dumper;die Dumper(\@x);
>>>>
>>>> Produces THIS:
> <snip>
>> I want the output to be this:
>>
>> $VAR1 = [
>> {
>> 'xxx' => 1,
>> 'yyy' => 2,
>> 'zzz' => 3
>> },
>> {
>> 'xxx' => 1,
>> 'yyy' => 2,
>> 'zzz' => 3
>> },
> <snip>
>
> You need to copy the hash, rather than simply pushing a reference to it.
>
> push @x, { %$y };
Or set Data::Dumper::Deepcopy=1;
Xho
------------------------------
Date: Wed, 24 Jun 2009 22:41:03 -0700
From: sln@netherlands.com
Subject: Re: dup hash ref in array
Message-Id: <c93645pc8cv2jjgf17get5jus00bnf6bhk@4ax.com>
On Wed, 24 Jun 2009 14:56:32 -0400, monkeys paw <noboey@home.com> wrote:
>Tad J McClellan wrote:
>> monkeys paw <noboey@home.com> wrote:
>>> This code:
>>>
>>>
>>> my @x;
>>> my $y;
>>>
>>> $y = {xxx => 1, yyy => 2, zzz => 3};
>>>
>>> for (1..3) {
>>> push @x, $y;
>>> }
>>>
>>> use Data::Dumper;die Dumper(\@x);
>>>
>>> Produces THIS:
>>>
>>> $VAR1 = [
>>> {
>>> 'xxx' => 1,
>>> 'yyy' => 2,
>>> 'zzz' => 3
>>> },
>>> $VAR1->[0],
>>> $VAR1->[0]
>>> ];
>>
>>
>> Yes it does.
>>
>> What about it?
>>
>>
>> (did you read the 3rd paragraph of the docs for the module
>> that you are using?)
>>
>>
>I want the output to be this:
>
>$VAR1 = [
> {
> 'xxx' => 1,
> 'yyy' => 2,
> 'zzz' => 3
> },
> {
> 'xxx' => 1,
> 'yyy' => 2,
> 'zzz' => 3
> },
> {
> 'xxx' => 1,
> 'yyy' => 2,
> 'zzz' => 3
> },
>];
Only an ignant from Apalacha would want that.
@x = (
{xxx => 1, yyy => 2, zzz => 3},
{xxx => 1, yyy => 2, zzz => 3},
{xxx => 1, yyy => 2, zzz => 3},
# add more here
);
-sln
------------------------------
Date: Wed, 24 Jun 2009 09:02:33 -0700 (PDT)
From: Syed Nida Manzar <syeda.nida.manzar@gmail.com>
Subject: Gifting Knowledge
Message-Id: <ef945052-be2c-44c7-8cbc-f278a92c81c4@x6g2000prc.googlegroups.com>
The basic goal underlying our website 'Latest 'Electronic Gadgets' is
to focus on the latest developments in field of gadget technology. It
will be our endeavour to provide all-inclusive information on latest
electronic gadgets that scoop up the market in the field of
electronics.
For More Details Visit:http://easyyelectronic.blogspot.com/search/
label/What%20are%20Electronic%20Gadgets%3F
------------------------------
Date: Wed, 24 Jun 2009 21:49:59 -0700
From: sln@netherlands.com
Subject: Re: matching two strings
Message-Id: <4c06459udh1mgo7mmv1c72dm7psjdpoes4@4ax.com>
On Tue, 23 Jun 2009 08:46:49 +0200, Peter Makholm <peter@makholm.net> wrote:
>Ben Morrow <ben@morrow.me.uk> writes:
>
>>> When I benchmarked grep vs. any, grep won by being 25% faster on
>>> random indata by avarage, even tough I naivly would have expected any
>>> to win.
>>
>> Wow. Is a sub call really that expensive?
>
>I'm not really sure what is happening and unfortunatly I didn't seem
>to keep my benchmarking code. I wrote about it at
>
> http://peter.makholm.net/2009/05/26/benchmarking-is-hard/
>
>I might have used Jason Switchers code modified to only use one
>needle and array.
>
>//Makholm
I don't see how grep is faster than anything.
-sln
---------------------------
use strict;
use warnings;
use Benchmark ':hireswallclock';
my @rxs = (qr/one/, qr/two/, qr/three/);
my @strings =
# (
# 'two three one',
# 'one three ',
# 'three two',
# 'three',
# ' '
# );
(
'one two three',
'one two three',
'one two three',
'one two three',
);
my ($pass,$val,$string,$rxs,$t0,$t1,$tdif);
$t0 = new Benchmark;
for (1..10_000) {
foreach $string (@strings) {
if ( not $val = grep $string !~ $_, @rxs)
{
# print "grep !$val = yes\n";
} else {
# print "grep !$val = no\n";
}
}
}
$t1 = new Benchmark;
print "grep code took:",timestr( timediff($t1, $t0) ),"\n";
$t0 = new Benchmark;
for (1..10_000) {
STRING:
for (@strings) {
for $rxs (@rxs) {
if ( !/$rxs/)
{
# print "var && no\n";
next STRING;
}
}
# print "var && yes\n";
}
}
$t1 = new Benchmark;
print "(1)&& code took:",timestr( timediff($t1, $t0) ),"\n";
$t0 = new Benchmark;
for (1..10_000) {
for (@strings) {
if ( /one/ && /two/ && /three/)
{
# print "const && yes\n";
} else {
# print "const && no\n";
}
}
}
$t1 = new Benchmark;
print "(2)&& code took:",timestr( timediff($t1, $t0) ),"\n";
__END__
Output:
grep code took:0.207262 wallclock secs ( 0.20 usr + 0.00 sys = 0.20 CPU)
(1)&& code took:0.246479 wallclock secs ( 0.25 usr + 0.00 sys = 0.25 CPU)
(2)&& code took:0.0333102 wallclock secs ( 0.03 usr + 0.00 sys = 0.03 CPU)
------------------------------
Date: Wed, 24 Jun 2009 16:18:47 -0500
From: Ted Zlatanov <tzz@lifelogs.com>
Subject: Re: Multiple server find and replace
Message-Id: <87zlbxuy88.fsf@lifelogs.com>
On Tue, 23 Jun 2009 12:17:20 -0700 (PDT) "jdonovan151@gmail.com" <jdonovan151@gmail.com> wrote:
jc> So I have about 70-80 servers that have a Nagios check running on
jc> them.. I realized today that in one of the .cfg files there is a
jc> value that is "/nagios/plugins/check_disk -w 20 -c 10"
jc> it needs to read:
jc> /nagios/plugins/check_disk -w 20% -c 10%
jc> I have the server list in a text file and can ssh as root to all of
jc> these servers what I need to be able to do is have a script that will
jc> read in the server list then go out to each machine go to /usr/local/
jc> nagios/myfile.cfg
jc> find that line and replace the value of 20 with the value of 20%.
jc> Any help is much appreciated and if your in the Boston area might get
jc> you a beer or two :)
Rather than screwing around with quoting, do this:
1) put the commands in a local file
2) copy the file to the remote system into, say, /tmp/go.sh
3) run "ssh MACHINE /tmp/go.sh"
This is significantly simpler, faster to develop, easier to understand
and trace (you can name the remote file with the date and time of
execution, so you know who ran what). Plus you won't have any quoting
bugs.
Ted
------------------------------
Date: Thu, 25 Jun 2009 04:42:28 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Thu Jun 25 2009
Message-Id: <KLs2Et.1Ftw@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.
Acme-BeCool-0.01
http://search.cpan.org/~seano/Acme-BeCool-0.01/
Make your modules use the modules that get you some.
----
Apache-SWIT-0.48
http://search.cpan.org/~bosu/Apache-SWIT-0.48/
mod_perl based application server with integrated testing.
----
Autodia-2.09
http://search.cpan.org/~teejay/Autodia-2.09/
The configuration and Utility perl module for AutoDia.
----
CPAN-Mini-Visit-0.06
http://search.cpan.org/~adamk/CPAN-Mini-Visit-0.06/
A generalised API version of David Golden's visitcpan
----
CPAN-Testers-Report-0.10
http://search.cpan.org/~dagolden/CPAN-Testers-Report-0.10/
CPAN Testers report object
----
CPANPLUS-Dist-Build-0.35_01
http://search.cpan.org/~bingos/CPANPLUS-Dist-Build-0.35_01/
CPANPLUS plugin to install packages that use Build.PL
----
Catalyst-Model-WebService-Solr-0.02
http://search.cpan.org/~bricas/Catalyst-Model-WebService-Solr-0.02/
Use WebService::Solr in your Catalyst application
----
Catalyst-Plugin-ConfigComponents-0.3.102
http://search.cpan.org/~pjfl/Catalyst-Plugin-ConfigComponents-0.3.102/
Creates components from config entries
----
CatalystX-InjectComponent-0.021
http://search.cpan.org/~rkrimen/CatalystX-InjectComponent-0.021/
Inject components into your Catalyst application
----
Config-Model-CursesUI-1.103
http://search.cpan.org/~ddumont/Config-Model-CursesUI-1.103/
Curses interface to edit config data
----
Config-Model-Itself-1.211
http://search.cpan.org/~ddumont/Config-Model-Itself-1.211/
Model editor for Config::Model
----
Config-Model-OpenSsh-1.206
http://search.cpan.org/~ddumont/Config-Model-OpenSsh-1.206/
OpenSsh configuration files editor
----
Data-Validation-0.3.104
http://search.cpan.org/~pjfl/Data-Validation-0.3.104/
Filter and check data values
----
Devel-LeakGuard-Object-0.06
http://search.cpan.org/~andya/Devel-LeakGuard-Object-0.06/
Scoped checks for object leaks
----
Digest-MD6-0.09
http://search.cpan.org/~andya/Digest-MD6-0.09/
Perl interface to the MD6 Algorithm
----
Digest-MD6-0.10
http://search.cpan.org/~andya/Digest-MD6-0.10/
Perl interface to the MD6 Algorithm
----
Dir-Project-3.015
http://search.cpan.org/~wsnyder/Dir-Project-3.015/
Project Environment determination
----
Elive-0.29
http://search.cpan.org/~warringd/Elive-0.29/
Elluminate Live! (c) client library
----
Env-PS1-0.06
http://search.cpan.org/~rsn/Env-PS1-0.06/
prompt string formatter
----
ExtUtils-XSpp-0.04
http://search.cpan.org/~smueller/ExtUtils-XSpp-0.04/
XS for C++
----
GRID-Cluster-0.02
http://search.cpan.org/~edusegre/GRID-Cluster-0.02/
Virtual clusters using SSH links
----
Gantry-Plugins-Session-0.04
http://search.cpan.org/~kesteb/Gantry-Plugins-Session-0.04/
Plugin for cookie based session management
----
Geo-IATA-0.0.1
http://search.cpan.org/~jmeltzer/Geo-IATA-0.0.1/
Lookup Airport Codes
----
Geo-IATA-0.0.2
http://search.cpan.org/~jmeltzer/Geo-IATA-0.0.2/
Search airports by iata, icao codes
----
HTML-FormHandler-0.26
http://search.cpan.org/~gshank/HTML-FormHandler-0.26/
form handler written in Moose
----
HTTP-OAI-3.22
http://search.cpan.org/~timbrody/HTTP-OAI-3.22/
API for the OAI-PMH
----
Linux-Unshare-0.01
http://search.cpan.org/~bosu/Linux-Unshare-0.01/
Perl interface for Linux unshare system call.
----
Locale-Msgfmt-0.01
http://search.cpan.org/~rsn/Locale-Msgfmt-0.01/
Compile .po files to .mo files
----
Metabase-0.001
http://search.cpan.org/~rjbs/Metabase-0.001/
a database framework and API for resource metadata
----
Metabase-Client-Simple-0.001
http://search.cpan.org/~rjbs/Metabase-Client-Simple-0.001/
a client that submits to Metabase servers
----
Metabase-Fact-0.001
http://search.cpan.org/~rjbs/Metabase-Fact-0.001/
base class for Metabase Facts
----
Metabase-Web-0.001
http://search.cpan.org/~rjbs/Metabase-Web-0.001/
the Metabase web service
----
Module-Install-MicroTemplate-0.01
http://search.cpan.org/~tokuhirom/Module-Install-MicroTemplate-0.01/
rendering template automatically
----
MooseX-Declare-0.23
http://search.cpan.org/~flora/MooseX-Declare-0.23/
Declarative syntax for Moose
----
MooseX-NonMoose-0.05
http://search.cpan.org/~doy/MooseX-NonMoose-0.05/
easy subclassing of non-Moose classes
----
Net-Drizzle-0.02
http://search.cpan.org/~tokuhirom/Net-Drizzle-0.02/
perl bindings for libdrizzle
----
Net-Drizzle-0.03
http://search.cpan.org/~tokuhirom/Net-Drizzle-0.03/
perl bindings for libdrizzle
----
Net-Drizzle-0.04
http://search.cpan.org/~tokuhirom/Net-Drizzle-0.04/
perl bindings for libdrizzle
----
POE-Component-Drizzle-0.01
http://search.cpan.org/~tokuhirom/POE-Component-Drizzle-0.01/
asynchronous non-blocking mysql/drizzle calls in POE
----
POE-Component-Server-NNTP-1.04
http://search.cpan.org/~bingos/POE-Component-Server-NNTP-1.04/
A POE component that provides NNTP server functionality.
----
PPIx-EditorTools-0.03
http://search.cpan.org/~mgrimes/PPIx-EditorTools-0.03/
Utility methods and base class for manipulating Perl via PPI
----
Padre-Plugin-Ecliptic-0.12
http://search.cpan.org/~azawawi/Padre-Plugin-Ecliptic-0.12/
Padre plugin that provides Eclipse-like useful features
----
Padre-Plugin-Perl6-0.46
http://search.cpan.org/~azawawi/Padre-Plugin-Perl6-0.46/
Padre plugin for Perl6
----
Parse-Method-Signatures-1.003008
http://search.cpan.org/~flora/Parse-Method-Signatures-1.003008/
Perl6 like method signature parser
----
Perl-Dist-WiX-0.185
http://search.cpan.org/~csjewell/Perl-Dist-WiX-0.185/
Experimental 4th generation Win32 Perl distribution builder
----
Perl-Metrics2-0.03
http://search.cpan.org/~adamk/Perl-Metrics2-0.03/
Perl metrics storage and processing engine
----
Process-0.27
http://search.cpan.org/~adamk/Process-0.27/
Objects that represent generic computational processes
----
RT-Extension-ResetPassword-0.03
http://search.cpan.org/~falcone/RT-Extension-ResetPassword-0.03/
----
Test-Reporter-Transport-Metabase-0.001
http://search.cpan.org/~dagolden/Test-Reporter-Transport-Metabase-0.001/
Metabase transport for Test::Reporter
----
WWW-Mechanize-GZip-0.12
http://search.cpan.org/~pegi/WWW-Mechanize-GZip-0.12/
tries to fetch webpages with gzip-compression
----
WWW-Shorten-Bitly-1.10
http://search.cpan.org/~pjain/WWW-Shorten-Bitly-1.10/
Interface to shortening URLs using <http://bit.ly>
----
Wx-0.91_01
http://search.cpan.org/~mbarbon/Wx-0.91_01/
interface to the wxWidgets cross-platform GUI toolkit
----
interface-0.01
http://search.cpan.org/~andya/interface-0.01/
Declare support for an interface
----
like-0.01
http://search.cpan.org/~andya/like-0.01/
Declare support for an interface
----
like-0.02
http://search.cpan.org/~andya/like-0.02/
Declare support for an interface
----
sapnwrfc-0.28
http://search.cpan.org/~piers/sapnwrfc-0.28/
SAP Netweaver RFC support for Perl
----
sapnwrfc-0.29
http://search.cpan.org/~piers/sapnwrfc-0.29/
SAP Netweaver RFC support for Perl
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/>
Smalltalk/Perl/Unix consulting, Technical writing, Comedy, etc. etc.
See http://methodsandmessages.vox.com/ for Smalltalk and Seaside discussion
------------------------------
Date: Wed, 24 Jun 2009 11:09:40 -0700 (PDT)
From: Xah Lee <xahlee@gmail.com>
Subject: talk of concurrency by Anders Hejlsberg and Guy Steele
Message-Id: <5846735f-74aa-4c6a-933a-83ded986390c@u9g2000prd.googlegroups.com>
of recent talks about concurrency, this video interview would be of
interest:
http://channel9.msdn.com/posts/Charles/Anders-Hejlsberg-and-Guy-Steele-Conc=
urrency-and-Language-Design/
Anders Hejlsberg and Guy Steele: Concurrency and Language Design
Posted By: Charles | Oct 6th, 2008 @ 6:27 AM | 75,079 Views | 19
Comments
Xah
=E2=88=91 http://xahlee.org/
=E2=98=84
------------------------------
Date: Wed, 24 Jun 2009 07:38:22 -0700 (PDT)
From: ccc31807 <cartercc@gmail.com>
Subject: Wide Finder results
Message-Id: <c02c8864-52ad-4b2d-b63c-da00e5a5729d@r3g2000vbp.googlegroups.com>
I ran across this last night, and found it extremely interesting.
In a comparison of a number of languages, Perl beats the socks off all
of them.
http://www.tbray.org/ongoing/When/200x/2007/10/30/WF-Results
CC
------------------------------
Date: Wed, 24 Jun 2009 20:20:32 -0700 (PDT)
From: taz <tazwin1@yahoo.com>
Subject: XML Parser
Message-Id: <427669f7-1798-413c-a7b3-8e12b7743748@j19g2000vbp.googlegroups.com>
Hello everyone, was wondering if someone might be able to point me in
the right direction. I have been working on a project that involves
reading XML files and taking some information from the file and
inserting into a MySQL db. I am fairly new to processing XML. I am
using xml simple to retrieve the needed information. I am getting all
the information I need, but when I pull it out of the XML I am getting
entities converted to their single characters (&) becomes &, etc.
Is there a way to keep the entity or do I have to use something else
to convert the string and have the characters into their proper format
before I insert it into the db?
------------------------------
Date: Wed, 24 Jun 2009 22:08:59 -0700
From: sln@netherlands.com
Subject: Re: XML Parser
Message-Id: <0216459m88udi53r67qua2fcdefi30o773@4ax.com>
On Wed, 24 Jun 2009 20:20:32 -0700 (PDT), taz <tazwin1@yahoo.com> wrote:
>Hello everyone, was wondering if someone might be able to point me in
>the right direction. I have been working on a project that involves
>reading XML files and taking some information from the file and
>inserting into a MySQL db. I am fairly new to processing XML. I am
>using xml simple to retrieve the needed information. I am getting all
>the information I need, but when I pull it out of the XML I am getting
>entities converted to their single characters (&) becomes &, etc.
>Is there a way to keep the entity or do I have to use something else
>to convert the string and have the characters into their proper format
>before I insert it into the db?
Simple isin't a parser. It uses a parser though. If Simple supports
it, you have to tell it to pass on to the parser that you want raw
content (original_content()) instead of translated.
Usually though, you use a SAX parser (Simple Api Xml) with your own
handlers to capture raw xml (original_content()) then, send the xml,
tags, attrib's, whatever, to Simple to have it convert into a structure.
Hopefully, you aren't using Simple to do the entire xml document.
Thats not such a good way to do it.
Of course, you could use RxParse (my module) version 2b which isin't
released yet, to do all of what Simple does and a hell of alot more.
I'm just finishing up on non-blocking and I will post it soon.
-sln
------------------------------
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 2491
***************************************
