[28995] in Perl-Users-Digest
Perl-Users Digest, Issue: 239 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Mar 20 06:10:09 2007
Date: Tue, 20 Mar 2007 03:09:05 -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 Tue, 20 Mar 2007 Volume: 11 Number: 239
Today's topics:
"Casting" a split into an array <fabrice.baro@gmail.com>
Re: "Casting" a split into an array xhoster@gmail.com
Re: "Casting" a split into an array <wahab-mail@gmx.de>
Re: "Casting" a split into an array <bik.mido@tiscalinet.it>
Re: "Casting" a split into an array <fabrice.baro@gmail.com>
Re: "Casting" a split into an array <someone@example.com>
Re: checking for filehandle <rvtol+news@isolution.nl>
eq and =? problem? Geoff Cox
Re: eq and =? problem? <adrian_200503@blinkenlights.ch>
Re: eval or do for <DATA> (Alan Curry)
Re: eval or do for <DATA> <uri@stemsystems.com>
Re: eval or do for <DATA> <wahab-mail@gmx.de>
Re: eval or do for <DATA> <henry.townsend@not.here>
Re: eval or do for <DATA> (Alan Curry)
Re: FAQ 8.4 How do I print something out in color? joepeck02@gmail.com
Re: FAQ 8.4 How do I print something out in color? <uri@stemsystems.com>
Re: I dotn understand this error <bik.mido@tiscalinet.it>
Re: I dotn understand this error <bik.mido@tiscalinet.it>
Re: I dotn understand this error <joe@inwap.com>
new CPAN modules on Tue Mar 20 2007 (Randal Schwartz)
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 19 Mar 2007 15:29:15 -0700
From: "Fabrice Baro" <fabrice.baro@gmail.com>
Subject: "Casting" a split into an array
Message-Id: <1174343355.053240.194330@y80g2000hsf.googlegroups.com>
my $seq = "ABC";
my %hash = ();
my $key = "key";
$hash{$key} = split "", $seq;
This gives the following warning: "Use of implicit split to @_ is
deprecated[...]"
I can get rid of the message by doing the following:
my @temp_array = split "", $seq;
$hash{$key} = @temp_array;
Is there a way to elegantly cast the result of my split into an array
in order to assign it directly in my hash ?
------------------------------
Date: 19 Mar 2007 22:49:26 GMT
From: xhoster@gmail.com
Subject: Re: "Casting" a split into an array
Message-Id: <20070319184928.829$2g@newsreader.com>
"Fabrice Baro" <fabrice.baro@gmail.com> wrote:
> my $seq = "ABC";
> my %hash = ();
> my $key = "key";
>
> $hash{$key} = split "", $seq;
>
> This gives the following warning: "Use of implicit split to @_ is
> deprecated[...]"
But the left hand side in parentheses:
( $hash{$key} ) = split "", $seq;
Xho
--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service $9.95/Month 30GB
------------------------------
Date: Mon, 19 Mar 2007 23:46:37 +0100
From: Mirco Wahab <wahab-mail@gmx.de>
Subject: Re: "Casting" a split into an array
Message-Id: <etn47c$pff$1@mlucom4.urz.uni-halle.de>
Fabrice Baro wrote:
> my $seq = "ABC";
> my %hash = ();
> my $key = "key";
>
> $hash{$key} = split "", $seq;
>
> This gives the following warning: "Use of implicit split to @_ is
> deprecated[...]"
You 'split' into scalar context. This is somehow unusual.
> I can get rid of the message by doing the following:
> my @temp_array = split "", $seq;
> $hash{$key} = @temp_array;
Did you check what you got in $hash{$key}
> Is there a way to elegantly cast the result of my split
> into an array in order to assign it directly in my hash ?
You mean " assign it directly in my hash *element* "?
A hash element has to be a scalar. To express a list
(what split returns), give it a reference of the array
containing the list elements:
$hash{$key} = [ split '', $seq ];
to get the array back, dereference it:
$hash{$key} ===> reference (scalar)
@{ $hash{$key} } ===> array
Regards
M.
------------------------------
Date: Tue, 20 Mar 2007 00:28:25 +0100
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: "Casting" a split into an array
Message-Id: <4n6uv29le3f7o7qfodt9s2otef1c6ae8qj@4ax.com>
On 19 Mar 2007 15:29:15 -0700, "Fabrice Baro" <fabrice.baro@gmail.com>
wrote:
>$hash{$key} = split "", $seq;
split() wants a *pattern* as a first parameter. If you give it a
string, it will be automatically converted to a pattern. The *only*
special case is a single whitespace.
In practice splitting on the null pattern is often used as a technique
for getting single charachters. Another one would be a /./g match in
list context. And yet another one would be unpack() with a '(A1)*'
template, or something like that.
>This gives the following warning: "Use of implicit split to @_ is
>deprecated[...]"
>I can get rid of the message by doing the following:
>
>my @temp_array = split "", $seq;
>$hash{$key} = @temp_array;
What do you expect this to do?
>Is there a way to elegantly cast the result of my split into an array
>in order to assign it directly in my hash ?
Depending on what you *really* want, you would go either with length()
or with an anonymous array.
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: 19 Mar 2007 19:12:41 -0700
From: "Fabrice Baro" <fabrice.baro@gmail.com>
Subject: Re: "Casting" a split into an array
Message-Id: <1174356761.515014.32210@y80g2000hsf.googlegroups.com>
Thank you all,
I wasn't that clear on what I wanted, sorry about that.
What I wanted was to split a string individually by character and
assign them to an array*; this array was to be assigned in the hash;
The solution that worked for me was Mirco's:
$hash{$key} = [ split '', $seq ];
xhos's suggestion:
( $hash{$key} ) = split "", $seq;
seems to assign only the first letter of $seq to the hash.
* hence the null splitting pattern ""; the reason I do this is to be
able to access each letter by index C++-style, e.g. $seq[0].
Is there a way to do this with perl ? The only indexing I found is
with substr(), but this function has little use for this case.
------------------------------
Date: Tue, 20 Mar 2007 05:11:10 GMT
From: "John W. Krahn" <someone@example.com>
Subject: Re: "Casting" a split into an array
Message-Id: <O1KLh.130871$cE3.3947@edtnps89>
Fabrice Baro wrote:
> Thank you all,
>
> I wasn't that clear on what I wanted, sorry about that.
> What I wanted was to split a string individually by character and
> assign them to an array*; this array was to be assigned in the hash;
> The solution that worked for me was Mirco's:
> $hash{$key} = [ split '', $seq ];
>
> xhos's suggestion:
> ( $hash{$key} ) = split "", $seq;
> seems to assign only the first letter of $seq to the hash.
>
> * hence the null splitting pattern ""; the reason I do this is to be
> able to access each letter by index C++-style, e.g. $seq[0].
> Is there a way to do this with perl ? The only indexing I found is
> with substr(), but this function has little use for this case.
What do you intend to do with the individual letters. There is probably a
better way to do it in Perl without using split.
John
--
Perl isn't a toolbox, but a small machine shop where you can special-order
certain sorts of tools at low cost and in short order. -- Larry Wall
------------------------------
Date: Tue, 20 Mar 2007 08:26:19 +0100
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: Re: checking for filehandle
Message-Id: <eto64b.1bs.1@news.isolution.nl>
Michele Dondi schreef:
> anno:
>> In Perl 10 there will be UNIVERSAL::DOES that addresses this kind of
>> problem.
>
> 5.10, Anno! People are still ranting about 6... I wonder on which
> isolinear chip 10 will be supposed to run! :-)
I prefer to have it called Perl5 version 10. Perl5 will not die, Perl6
will have her own life.
Perl6 is a totally different language that again includes a lot of
goodies from other tools and languages (such as Perl5), just as Perl
originally did with awk, sed etc.
--
Affijn, Ruud
"Gewoon is een tijger."
------------------------------
Date: Tue, 20 Mar 2007 08:34:52 +0000
From: Geoff Cox
Subject: eq and =? problem?
Message-Id: <l27vv25s9adfo2tbpbqm9i6k9kop94bhcd@4ax.com>
Hello,
It would seem that the following code does not distinguish between the
"bp" and the "bplanning". I thought that using eq and not =~ would
work.
Any ideas please?
Cheers
Geoff
elsif ( $path eq
"docs/applied-business/as/classroom-notes/edexcel/unit2/bp" ) {
intro($path);
appliedbusinessclassroomnotesedexcelunit2bp($path);
}
elsif ( $path eq
"docs/applied-business/as/classroom-notes/edexcel/unit2/bplanning" ) {
intro($path);
appliedbusinessclassroomnotesedexcelunit2bplanning($path);
}
------------------------------
Date: Tue, 20 Mar 2007 10:41:29 +0100
From: Adrian Ulrich <adrian_200503@blinkenlights.ch>
Subject: Re: eq and =? problem?
Message-Id: <20070320104129.1796c0e5.adrian_200503@blinkenlights.ch>
> Any ideas please?
This works just fine for me.
How about providing the full script or a simple testcase?
------------------------------
Date: Mon, 19 Mar 2007 22:11:21 +0000 (UTC)
From: pacman@TheWorld.com (Alan Curry)
Subject: Re: eval or do for <DATA>
Message-Id: <etn1q9$hc1$1@pcls6.std.com>
In article <C7ednQxjyt44ZGPYnZ2dnUVZ_vWtnZ2d@comcast.com>,
Henry Townsend <henry.townsend@not.here> wrote:
>my $hash = do <DATA>;
>__DATA__
>(Data::Dumper output)
>
>But unfortunately according to "perldoc -f do" it's only defined to
>operate on a file name, not a file handle. I really don't want to store
>the data in a separate file. Does anyone know a way to drag this stuff
>in as if it was in a separate file and I could use "do 'filename'"?
Since "do" is just reading a file into a string and then "eval"-ing the
string, how about this:
my $hash = eval <DATA>;
--
Alan Curry
pacman@world.std.com
------------------------------
Date: Mon, 19 Mar 2007 17:18:08 -0500
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: eval or do for <DATA>
Message-Id: <x74pogvpwf.fsf@mail.sysarch.com>
>>>>> "AC" == Alan Curry <pacman@TheWorld.com> writes:
AC> In article <C7ednQxjyt44ZGPYnZ2dnUVZ_vWtnZ2d@comcast.com>,
AC> Henry Townsend <henry.townsend@not.here> wrote:
>> my $hash = do <DATA>;
>> __DATA__
>> (Data::Dumper output)
>>
>> But unfortunately according to "perldoc -f do" it's only defined to
>> operate on a file name, not a file handle. I really don't want to store
>> the data in a separate file. Does anyone know a way to drag this stuff
>> in as if it was in a separate file and I could use "do 'filename'"?
AC> Since "do" is just reading a file into a string and then "eval"-ing the
AC> string, how about this:
AC> my $hash = eval <DATA>;
that will fail as it will only read one line of DATA since eval provides
a scalar context. see my other post for a correct solution.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: Mon, 19 Mar 2007 23:20:07 +0100
From: Mirco Wahab <wahab-mail@gmx.de>
Subject: Re: eval or do for <DATA>
Message-Id: <etn2r6$ov7$1@mlucom4.urz.uni-halle.de>
Alan Curry wrote:
> Since "do" is just reading a file into a string and then "eval"-ing the
> string, how about this:
>
> my $hash = eval <DATA>;
I guess you meant 'eval do' and hesitated writing it ;-)
my $hash = eval do {local $/; <DATA>};
M.
------------------------------
Date: Mon, 19 Mar 2007 22:39:54 -0400
From: Henry Townsend <henry.townsend@not.here>
Subject: Re: eval or do for <DATA>
Message-Id: <msOdndH6HKIH1GLYnZ2dnUVZ_vzinZ2d@comcast.com>
Uri Guttman wrote:
> so you put eval in the subject. why did you do that? all do does is
> slurp in the file and run eval. so apply the same concept to the DATA
> handle. you can slurp it yourself by setting $/ to undef (best in a
> local) or use File::Slurp:
Thanks. I did know to try eval but was hung up on the fact that it
forces scalar context; I didn't think to unset $/. Works great now.
HT
------------------------------
Date: Tue, 20 Mar 2007 04:44:25 +0000 (UTC)
From: pacman@TheWorld.com (Alan Curry)
Subject: Re: eval or do for <DATA>
Message-Id: <etnor9$naf$1@pcls6.std.com>
In article <etn2r6$ov7$1@mlucom4.urz.uni-halle.de>,
Mirco Wahab <wahab-mail@gmx.de> wrote:
>Alan Curry wrote:
>> Since "do" is just reading a file into a string and then "eval"-ing the
>> string, how about this:
>>
>> my $hash = eval <DATA>;
>
>I guess you meant 'eval do' and hesitated writing it ;-)
>
>
> my $hash = eval do {local $/; <DATA>};
Actually I started with eval join '',<DATA> then played with variations and
ended up over-golfing it.
The original poster didn't actually say multi-line, did he? Maybe his
__DATA__ was generated with $Data::Dumper::Indent=0, that makes my answer
work.
--
Alan Curry
pacman@world.std.com
------------------------------
Date: 19 Mar 2007 20:30:32 -0700
From: joepeck02@gmail.com
Subject: Re: FAQ 8.4 How do I print something out in color?
Message-Id: <1174361432.719381.288650@n59g2000hsh.googlegroups.com>
This was awesome!!! Keep submitting the tips, I am reading through
them and hopefully I will make it a daily routine. This tip is really
really nice!
------------------------------
Date: Mon, 19 Mar 2007 22:53:12 -0500
From: Uri Guttman <uri@stemsystems.com>
To: joepeck02@gmail.com
Subject: Re: FAQ 8.4 How do I print something out in color?
Message-Id: <x7k5xcpo47.fsf@mail.sysarch.com>
>>>>> "j" == joepeck02 <joepeck02@gmail.com> writes:
j> This was awesome!!! Keep submitting the tips, I am reading through
j> them and hopefully I will make it a daily routine. This tip is really
j> really nice!
you haven't been here long. the perl faq has been posted regularly here
for several years. and you can read the whole thing yourself and you
should as it comes with the standard perl docs on your system. i am
always amazed at how many perl newbies either don't know about the FAQ
or haven't read some of it. reading it all is extremely useful even if
you don't understand all the entries. then you will know the type of
questions answered and to go there first before asking a question
elsewhere.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: Tue, 20 Mar 2007 00:11:29 +0100
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: I dotn understand this error
Message-Id: <a36uv25egg6l6k1ppfjgr46qrqkbfce0uq@4ax.com>
On 19 Mar 2007 13:14:58 -0700, "?????" <hackeras@gmail.com> wrote:
>> None of the code lines. It's line 43 of eval 17.
^^^^
^^^^
>This is what i dont understand... when i see line 43 i opne index.pl
>and look at line 43 but this isnt the problem line as it seems....
>
>Can you plz explain?
I can *please* explain, probably: check
perldoc -f eval
HTH,
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: Tue, 20 Mar 2007 00:18:22 +0100
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: I dotn understand this error
Message-Id: <m76uv2lf1mnf677c5mmk2gq8r1bm6o8991@4ax.com>
On 19 Mar 2007 14:27:33 -0700, krakle@gmail.com wrote:
>> I opened index.pl with notepad
>
>You use notepad?
Well, he's free to do so. It's a (very rudimentary - yes, yes, yes!)
text editor after all. BTW: I just heard the other day, I can't
remember whether here or in PM, about
http://notepad-plus.sourceforge.net/
Maybe he could be interested in it. (Not that it has much of the
notepad L&F as far as I can see from the screenshots...)
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: Mon, 19 Mar 2007 20:37:33 -0700
From: Joe Smith <joe@inwap.com>
Subject: Re: I dotn understand this error
Message-Id: <lq6dnZIrw6ufymLYnZ2dnUVZ_tWhnZ2d@comcast.com>
Νίκος wrote:
>>>> [Mon Mar 19 11:49:06 2007] index.pl: Use of uninitialized value in
>>>> concatenation (.) or string at (eval 17) line 43.
>> None of the code lines. It's line 43 of eval 17.
>
> This is what i dont understand... when i see line 43 i opne index.pl
> and look at line 43 but this isnt the problem line as it seems....
The problem is _NOT_ in line 43 of index.pl.
Your program is calling eval() several times, possibly in the form of {s///e;}.
The argument to the eval() appears to be a string with embedded "\n" characters.
The 17th time that eval() is called, it is called with a string that
contains at least 43 lines. The problem is in that string.
You may have to add some debugging print() statements, like:
print "About to call eval #",++$eval_count,"with argument '$string'\n";
eval $string;
print "The eval produced \$@ = $@\n";
-Joe
------------------------------
Date: Tue, 20 Mar 2007 04:42:14 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Tue Mar 20 2007
Message-Id: <JF6qEE.20wL@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.
B-Lint-1.09
http://search.cpan.org/~jjore/B-Lint-1.09/
Perl lint
----
B-Lint-Pluggable-1.0
http://search.cpan.org/~jjore/B-Lint-Pluggable-1.0/
----
Bio-DOOP-DOOP-0.12
http://search.cpan.org/~tibi/Bio-DOOP-DOOP-0.12/
DOOP API main module
----
CGI-Application-Plugin-HTDot-0.06
http://search.cpan.org/~cromedome/CGI-Application-Plugin-HTDot-0.06/
Enable "magic dot" notation in CGI::Application-derived applications that use HTML::Template for their templating mechanism.
----
CaCORE-3.2.1_r1
http://search.cpan.org/~ncicb/CaCORE-3.2.1_r1/
----
Class-CompoundMethods-0.05
http://search.cpan.org/~jjore/Class-CompoundMethods-0.05/
Create methods from components
----
Config-IniHash-2.9.0
http://search.cpan.org/~jenda/Config-IniHash-2.9.0/
Perl extension for reading and writing INI files
----
Crypt-OpenSSL-CA-0.07
http://search.cpan.org/~domq/Crypt-OpenSSL-CA-0.07/
The crypto parts of an X509v3 Certification Authority
----
Crypt-OpenSSL-CA-0.08
http://search.cpan.org/~domq/Crypt-OpenSSL-CA-0.08/
The crypto parts of an X509v3 Certification Authority
----
Data-VString-0.000004
http://search.cpan.org/~ferreira/Data-VString-0.000004/
Perl extension to handle v-strings (often used as version strings)
----
Devel-ebug-0.47
http://search.cpan.org/~lbrocard/Devel-ebug-0.47/
A simple, extensible Perl debugger
----
Devel-ebug-Wx-0.05
http://search.cpan.org/~mbarbon/Devel-ebug-Wx-0.05/
GUI interface for your (d)ebugging needs
----
Device-TNC-0.03
http://search.cpan.org/~rbdavison/Device-TNC-0.03/
A generic interface to a TNC
----
Egg-Release-1.20
http://search.cpan.org/~lushe/Egg-Release-1.20/
WEB application framework release version.
----
Games-Bingo-Print-0.04
http://search.cpan.org/~jonasbn/Games-Bingo-Print-0.04/
a PDF Generation Class for Games::Bingo
----
HTML-SimpleLinkExtor-1.17
http://search.cpan.org/~bdfoy/HTML-SimpleLinkExtor-1.17/
Extract links from HTML
----
Language-Prolog-Types-0.10
http://search.cpan.org/~salva/Language-Prolog-Types-0.10/
Prolog types in Perl.
----
Lingua-JA-Summarize-0.07
http://search.cpan.org/~kazuho/Lingua-JA-Summarize-0.07/
A keyword extractor / summary generator
----
Mac-iPhoto-Shell-0.15
http://search.cpan.org/~bdfoy/Mac-iPhoto-Shell-0.15/
----
MasonX-StaticBuilder-0.02
http://search.cpan.org/~skud/MasonX-StaticBuilder-0.02/
Build a static website from Mason components
----
Net-MirapointAdmin-3.03
http://search.cpan.org/~ahall/Net-MirapointAdmin-3.03/
Perl interface to the Mirapoint administration protocol
----
Net-WhoisNG-0.09
http://search.cpan.org/~stiqs/Net-WhoisNG-0.09/
Perl extension for whois and parsing
----
Object-InsideOut-3.13
http://search.cpan.org/~jdhedden/Object-InsideOut-3.13/
Comprehensive inside-out object support module
----
POE-Component-Server-SimpleSMTP-0.96
http://search.cpan.org/~bingos/POE-Component-Server-SimpleSMTP-0.96/
A simple to use POE SMTP Server.
----
POSIX-strptime-0.07
http://search.cpan.org/~gozer/POSIX-strptime-0.07/
Perl extension to the POSIX date parsing strptime(3) function
----
POSIX-strptime-0.08
http://search.cpan.org/~gozer/POSIX-strptime-0.08/
Perl extension to the POSIX date parsing strptime(3) function
----
Perl-Critic-1.04
http://search.cpan.org/~thaljef/Perl-Critic-1.04/
Critique Perl source code for best-practices
----
Physics-Psychrometry-1.0
http://search.cpan.org/~mikem/Physics-Psychrometry-1.0/
Perl extension for calculating Psychrometric measures for moist air
----
Proc-Queue-1.21
http://search.cpan.org/~salva/Proc-Queue-1.21/
limit the number of child processes running
----
SVN-Mirror-0.73
http://search.cpan.org/~clkao/SVN-Mirror-0.73/
Mirror remote repository to local Subversion repository
----
Set-CrossProduct-1.91
http://search.cpan.org/~bdfoy/Set-CrossProduct-1.91/
work with the cross product of two or more sets
----
Task-Test-Run-AllPlugins-0.0100
http://search.cpan.org/~shlomif/Task-Test-Run-AllPlugins-0.0100/
Specifications for installing all the Test::Run Plugins
----
Test-File-Contents-0.05
http://search.cpan.org/~skud/Test-File-Contents-0.05/
Test routines for examining the contents of files
----
Test-Run-0.0109
http://search.cpan.org/~shlomif/Test-Run-0.0109/
----
Test-Run-CmdLine-0.0104
http://search.cpan.org/~shlomif/Test-Run-CmdLine-0.0104/
Analyze tests from the command line using Test::Run
----
Test-Run-Plugin-ColorFileVerdicts-0.01
http://search.cpan.org/~shlomif/Test-Run-Plugin-ColorFileVerdicts-0.01/
make the file verdict ("ok", "NOT OK") colorful.
----
Text-HikiDoc-1.018
http://search.cpan.org/~kawabata/Text-HikiDoc-1.018/
Pure Perl implementation of 'HikiDoc' which is a text-to-HTML conversion tool.
----
Tie-Cycle-1.15
http://search.cpan.org/~bdfoy/Tie-Cycle-1.15/
Cycle through a list of values via a scalar.
----
Tree-Simple-Manager-0.03
http://search.cpan.org/~stevan/Tree-Simple-Manager-0.03/
A class for managing multiple Tree::Simple hierarchies
----
URI-ParseSearchString-2.0
http://search.cpan.org/~sden/URI-ParseSearchString-2.0/
parse Apache refferer logs and extract search engine query strings.
----
Yahoo-Marketing-0.10
http://search.cpan.org/~jlavallee/Yahoo-Marketing-0.10/
an interface for Yahoo! Search Marketing's Web Services.
----
forks-0.22
http://search.cpan.org/~rybskej/forks-0.22/
drop-in replacement for Perl threads using fork()
----
p5-Palm-1.008
http://search.cpan.org/~bdfoy/p5-Palm-1.008/
----
reuters-21578
http://search.cpan.org/~kwilliams/reuters-21578/
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: 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 239
**************************************
