[29938] in Perl-Users-Digest
Perl-Users Digest, Issue: 1181 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Jan 9 14:09:42 2008
Date: Wed, 9 Jan 2008 11:09:07 -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 Wed, 9 Jan 2008 Volume: 11 Number: 1181
Today's topics:
"Enter this obfuscated code before submitting" help nee <wheeledBobNOSPAM@yahoo.com>
Re: "Enter this obfuscated code before submitting" help <peter@makholm.net>
Re: "Enter this obfuscated code before submitting" help <wheeledBobNOSPAM@yahoo.com>
Re: "global watch-expressions" in perldb? <jl_post@hotmail.com>
Re: Active State perl for windows not working. <wheeledBobNOSPAM@yahoo.com>
Re: Active State perl for windows not working. <jurgenex@hotmail.com>
Re: every($key, $interval) function <rvtol+news@isolution.nl>
Re: every($key, $interval) function <tzz@lifelogs.com>
Re: every($key, $interval) function <uri@stemsystems.com>
Re: every($key, $interval) function <No_4@dsl.pipex.com>
Re: FAQ 7.16 How do I create a static variable? <bik.mido@tiscalinet.it>
Re: FAQ 7.16 How do I create a static variable? <brian.d.foy@gmail.com>
Help with a Reg Ex <amerar@iwc.net>
Inserting, update and deleteting a database under condi <nikos1337@gmail.com>
Re: Inserting, update and deleteting a database under c <smallpond@juno.com>
Re: Inserting, update and deleteting a database under c <bik.mido@tiscalinet.it>
Re: minicpan, CPAN/CPANPLUS and autobundles on linux <bik.mido@tiscalinet.it>
Perl Database Programing download for the template <kwan.jingx@gmail.com>
Re: problem when submitting a string through a form <nikos1337@gmail.com>
Re: Using CPAN "lightweight" <bernie@fantasyfarm.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 09 Jan 2008 13:03:20 GMT
From: still just me <wheeledBobNOSPAM@yahoo.com>
Subject: "Enter this obfuscated code before submitting" help needed (CGI)
Message-Id: <sah9o3lv27gc8pv7j5v7luu6ki21n1900e@4ax.com>
I need to add one of those "Enter this generated graphic code" keys to
an HTML form to stop auto submissions.
I'd google it, but I'm not even sure what the industry buzzword to
describe these is (heads up appreciated!).
Alternatively, if anyone has a pointer to some specific code and/or
snippets they like to use, that would be great too.
Thanks,
------------------------------
Date: Wed, 09 Jan 2008 13:20:43 +0000
From: Peter Makholm <peter@makholm.net>
Subject: Re: "Enter this obfuscated code before submitting" help needed (CGI)
Message-Id: <87hchnw2xg.fsf@hacking.dk>
still just me <wheeledBobNOSPAM@yahoo.com> writes:
> I'd google it, but I'm not even sure what the industry buzzword to
> describe these is (heads up appreciated!).
The word you're lookinf for is CAPTHCA
http://en.wikipedia.org/wiki/CAPTCHA
> Alternatively, if anyone has a pointer to some specific code and/or
> snippets they like to use, that would be great too.
And CPAN has a lot of modules related to captchas
http://search.cpan.org/search?query=Captcha&mode=all
//Makholm
------------------------------
Date: Wed, 09 Jan 2008 15:19:15 GMT
From: still just me <wheeledBobNOSPAM@yahoo.com>
Subject: Re: "Enter this obfuscated code before submitting" help needed (CGI)
Message-Id: <7fp9o3tkhjemfjpnl3qqrhm04g1kra7k89@4ax.com>
On Wed, 09 Jan 2008 13:20:43 +0000, Peter Makholm <peter@makholm.net>
wrote:
>still just me <wheeledBobNOSPAM@yahoo.com> writes:
>
>> I'd google it, but I'm not even sure what the industry buzzword to
>> describe these is (heads up appreciated!).
>
>The word you're lookinf for is CAPTHCA
>http://en.wikipedia.org/wiki/CAPTCHA
>
>> Alternatively, if anyone has a pointer to some specific code and/or
>> snippets they like to use, that would be great too.
>
>And CPAN has a lot of modules related to captchas
>http://search.cpan.org/search?query=Captcha&mode=all
>
>//Makholm
Thanks, that should get me rolling
------------------------------
Date: Wed, 9 Jan 2008 08:28:47 -0800 (PST)
From: "jl_post@hotmail.com" <jl_post@hotmail.com>
Subject: Re: "global watch-expressions" in perldb?
Message-Id: <3ec376ea-c9f7-4b6b-b2a3-a2982831a3c4@l6g2000prm.googlegroups.com>
On Jan 8, 1:44 pm, "jl_p...@hotmail.com" <jl_p...@hotmail.com> wrote:
>
> Ironically, it was an explanation in a Ruby book that helped me
> understand what the Perl documentation should have explained. (And it
> did it using less words, too, since it didn't bother explaining that
> it should already be obvious.)
Hmmm... looking back at my earlier post, it makes it look like I
think that Perl documentation is sub-standard. That wasn't what I
meant at all.
To clarify, I meant to say that I think that Perl documentation is
very well done, both in the Camel book and in the perldocs. (I've
even consulted Perl documentation for C behavior, it's that good!)
It's just that I felt that the explanation in "perldoc perldebug" of
the debugger's "w expr" command was a surprising departure from the
comprehensive documentation I had come to expect and enjoy.
Sometimes I take Perl documentation for granted, which I've
discovered when I've tried to learn new languages -- few programming
languages (scripting or otherwise) have documentation that is anywhere
near as helpful (or comprehensive) as Perl's. And when I'm used to
pulling up the Perl documentation I want literally within seconds,
it's frustrating learning "the great new programming language" when I
spend hours trying to find documentation needed to use specific code
in this new language.
(In other words, I make the mistake thinking that just because Perl
has great documentation, all other programming languages should, too.
In reality, that's often far from the truth.)
-- Jean-Luc
------------------------------
Date: Wed, 09 Jan 2008 15:11:43 GMT
From: still just me <wheeledBobNOSPAM@yahoo.com>
Subject: Re: Active State perl for windows not working.
Message-Id: <aso9o3lksa4gb9n09n08ojb7juclf56ljh@4ax.com>
On Tue, 08 Jan 2008 16:34:38 -0400, Caduceus <kcom@fusemail.com>
wrote:
>When I try to type in perl -v, perl -h,perl -w, or perl -procinv.pl
>nothing happens. Is there something I can do for this? TIA Steve
start a command window, change to the perl directory (e.g. c:\perl)
and see what happens. If it works, then you have a simple PATH
problem. You can fix that through windows, by writing a .bat file to
set the path each time you use perl, or do a re-install and allow the
install to modify the system path for you.
------------------------------
Date: Wed, 09 Jan 2008 17:48:44 GMT
From: Jürgen Exner <jurgenex@hotmail.com>
Subject: Re: Active State perl for windows not working.
Message-Id: <o12ao3tjk7hp3m8qongndkecm946ssf7o5@4ax.com>
still just me <wheeledBobNOSPAM@yahoo.com> wrote:
>On Tue, 08 Jan 2008 16:34:38 -0400, Caduceus <kcom@fusemail.com>
>wrote:
>
>>When I try to type in perl -v, perl -h,perl -w, or perl -procinv.pl
>>nothing happens. Is there something I can do for this? TIA Steve
>
>start a command window, change to the perl directory (e.g. c:\perl)
>and see what happens. If it works, then you have a simple PATH
>problem. You can fix that through windows, by writing a .bat file to
>set the path each time you use perl, or do a re-install and allow the
>install to modify the system path for you.
Any reason why not simply adding the perl bin directory to the path
permanently?
Control Panel -> System -> Advanced -> Environment Variables
jue
------------------------------
Date: Wed, 9 Jan 2008 12:12:21 +0100
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: Re: every($key, $interval) function
Message-Id: <fm2dr9.10k.1@news.isolution.nl>
Uri Guttman schreef:
> Ruud:
>> sub every{
>> my %counters if 0;
>
> don't use that broken idiom.
Here it hasn't broken yet.
> it will fail under 5.10 since it supports
> state variables.
I'll try not to forget to add a comment like "statical, of course use a
state variable in Perl >=5.10" next time.
Or maybe better, refer to `perldoc -q static`.
>> my ($div, @id) = @_;
>> return !(++$counters{ caller(), $div, @id } % $div);
>
> just for education of others, that is the old pseudo multilevel hash
> from perl4 days. it is rare to see a good use for it these days.
See also "$;" in `perldoc perlvar`.
--
Affijn, Ruud
"Gewoon is een tijger."
------------------------------
Date: Wed, 09 Jan 2008 07:36:21 -0600
From: Ted Zlatanov <tzz@lifelogs.com>
Subject: Re: every($key, $interval) function
Message-Id: <86prwbi0iy.fsf@lifelogs.com>
On Wed, 9 Jan 2008 02:36:58 +0100 "Dr.Ruud" <rvtol+news@isolution.nl> wrote:
R> Ted Zlatanov schreef:
>> Dr.Ruud:
>>> #!/usr/bin/perl
>>> use strict;
>>> use warnings;
>>
>>> sub every_factory {
>>> my $d = shift;
>>> my $n;
>>> return sub { !(++$n % $d) }
>>> }
>>
>>> my ($everyX, $everyY) = (every_factory(3), every_factory(5));
>>
>>> for my $i (1..50) {
>>> print "$i:X\n" if $everyX->();
>>> print "$i:Y\n" if $everyY->();
>>> }
>> I don't like it as much as every(50) because it separates the
>> number of cycles from the usage of the function, so you'd have to look
>> back up to remember how many cycles $everyX will use.
R> Then just call it $every50.
The point is I'm forced to think of a variable and how to use it, plus I
need to initialize it, instead of saying every(50). I think that
complicates life for the user because the code is not simple enough
(it's neat, as I already mentioned, but just not simple).
R> Or compromise:
R> #!/usr/bin/perl
R> use strict;
R> use warnings;
R> sub every{
R> my %counters if 0;
R> my ($div, @id) = @_;
R> return !(++$counters{ caller(), $div, @id } % $div);
R> }
R> for my $i (1..13) {
R> print "A:$i\n" if every(3); print "B:$i\n" if every(3,"B");
R> print "C:$i\n" if every(5);
R> }
R> Ben Morrow schreef:
>> The obvious answer is to call it like
>> every(my $dummy, 50)
>> and key your hash on refaddr \$_[0]
>> [...]
R> #!/usr/bin/perl
R> use strict;
R> use warnings;
R> sub every{
R> my %counters if 0;
R> (++$counters{ \$_[1] } % $_[0]) or $_[1] and print $_[1], "\n";
R> }
R> for my $i (1..13) {
R> every(7, my $ev0);
R> every(3, my $ev1 = "A:$i");
R> every(3, my $ev2 = "B:$i");
R> every(5, my $ev3 = "C:$i");
R> }
Both of those are close but still requires thinking because the code is
not smart enough (as I mentioned, a __COLUMN__ value similar to __LINE__
and __FILE__ would do the right thing, or see below for opcode fun).
The goal is to do
warn "five or six" if (every(5) || every(6));
without external modules, if possible. I don't want to think about the
every() function whenever I use it: the bugs that would come from the
example above if it was badly implemented are just too nasty.
So far it seems like Ben's idea is the best way to do what I mean with
core Perl, but it still bothers me that I can't avoid creating state
*outside* the function call despite what caller() offers. Please
understand, I like all the solutions and they are clever, but they don't
get to the simplicity of the example above.
On Wed, 9 Jan 2008 02:18:54 +0000 Ben Morrow <ben@morrow.me.uk> wrote:
BM> An alternative would be to write a tiny bit of XS that grabs the
BM> return op number from the top entry in the call stack: basically,
BM> this would key on the place in the source where every was called.
That's exactly what I'd like, without the XS :)
Could I do it with Inline::C? How about a module that extends caller()
to do this (the DB override to caller() doesn't seem sufficient)? Maybe
one of the core debugging/profiling modules already provides this
information? I couldn't find it.
Thanks to everyone for the suggestions!
Ted
------------------------------
Date: Wed, 09 Jan 2008 16:37:07 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: every($key, $interval) function
Message-Id: <x7bq7vdkgc.fsf@mail.sysarch.com>
>>>>> "R" == Ruud <rvtol+news@isolution.nl> writes:
R> Uri Guttman schreef:
>> Ruud:
>>> sub every{
>>> my %counters if 0;
>>
>> don't use that broken idiom.
R> Here it hasn't broken yet.
it is broken now as it isn't documented. it is a bug in perl that lets
that code 'work'. using it is a poor idea and even worse showing it to
others on usenet. it is trivial to get such a thing with a block surrounding
the sub and putting the my variable out there. there is no reason to use
the my/if code and plenty of reasons to not use it.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.sysarch.com --
----- Perl Architecture, Development, Training, Support, Code Review ------
----------- Search or Offer Perl Jobs ----- http://jobs.perl.org ---------
--------- Gourmet Hot Cocoa Mix ---- http://bestfriendscocoa.com ---------
------------------------------
Date: Wed, 09 Jan 2008 19:03:43 +0000
From: Big and Blue <No_4@dsl.pipex.com>
To: Uri Guttman <uri@stemsystems.com>
Subject: Re: every($key, $interval) function
Message-Id: <47851A8F.4090101@dsl.pipex.com>
Uri Guttman wrote:
> R> sub every{
> R> my %counters if 0;
>
> don't use that broken idiom. it will fail under 5.10 since it supports
> state variables.
"our %counters" works.
--
Just because I've written it doesn't mean that
either you or I have to believe it.
------------------------------
Date: Wed, 09 Jan 2008 17:54:41 +0100
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: FAQ 7.16 How do I create a static variable?
Message-Id: <s1v9o3pi95rg3p15hn106snkdsd4j8enf5@4ax.com>
On Wed, 9 Jan 2008 00:03:01 -0800, PerlFAQ Server
<brian@stonehenge.com> wrote:
>7.16: How do I create a static variable?
How 'bout a mention of 5.10's C<state>?
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: Wed, 09 Jan 2008 13:01:20 -0600
From: brian d foy <brian.d.foy@gmail.com>
Subject: Re: FAQ 7.16 How do I create a static variable?
Message-Id: <090120081301207726%brian.d.foy@gmail.com>
In article <s1v9o3pi95rg3p15hn106snkdsd4j8enf5@4ax.com>, Michele Dondi
<bik.mido@tiscalinet.it> wrote:
> On Wed, 9 Jan 2008 00:03:01 -0800, PerlFAQ Server
> <brian@stonehenge.com> wrote:
>
> >7.16: How do I create a static variable?
>
> How 'bout a mention of 5.10's C<state>?
Yep, this is another one that needs an update for 5.10. perlfaq7 has a
few others too.
Now I just need time to get to them. :)
------------------------------
Date: Wed, 9 Jan 2008 11:00:18 -0800 (PST)
From: "amerar@iwc.net" <amerar@iwc.net>
Subject: Help with a Reg Ex
Message-Id: <fd51c691-21ad-49dc-9a18-b86ced16da62@k39g2000hsf.googlegroups.com>
I have the following expression in my Perl script:
if (/^"([^\,].+)"\,"$/)
Although I know that it is checking to see if the string starts with
some characters, it is not working for my input file.
Can someone explain to me in english what it is doing???
Thanks in advance.
------------------------------
Date: Wed, 9 Jan 2008 05:17:48 -0800 (PST)
From: Nikos <nikos1337@gmail.com>
Subject: Inserting, update and deleteting a database under conditions
Message-Id: <df68e2e6-1419-4f0a-90db-8beea842a0f9@j78g2000hsd.googlegroups.com>
Hello, i'am trying to perl code the following ideas i have commented
as remarks but my attempts were fruitless.
Its complicated and although i tried to work some code, my code does
not do what the remarks say.
#===============================================================================
my @files = glob "$ENV{'DOCUMENT_ROOT'}/data/text/*.txt";
my @menu_files = map m{([^/]+)\.txt}, @files;
my @dbfiles = $db->do( 'SELECT title, body FROM articles' );
my $replace = $db->prepare( 'INSERT INTO article (title, body) VALUES
(?, ?)' );
foreach ( @menu_files ) {
#Check every filename(item in @menu_files) as well as its content
to see if is already inserted in table articles under columns title
and body
#============ INSERT NEW FILENAMES & CONTENTS INTO DATABASE IF ANY
=============
#If filename and content dont already exist in the db then do
insert them
#===== UPDATE THE DB ENTRY IF THERE IS A MODIFICATION IN A FILES
CONTENTS =====
#If filename exists in the db under column title but its content is
different from the database's content then update column body in the
db
#======== DELETE ANY DB ENTRY OF A FILENAME THATDOESNT EXIST ANY
MORE =========
#Delete all db records that doesnt have a corresponding filename in
the hdd
}
------------------------------
Date: Wed, 9 Jan 2008 08:40:39 -0800 (PST)
From: smallpond <smallpond@juno.com>
Subject: Re: Inserting, update and deleteting a database under conditions
Message-Id: <116b8f7a-2bd0-4c0a-8749-e9854659eec6@e25g2000prg.googlegroups.com>
On Jan 9, 8:17 am, Nikos <nikos1...@gmail.com> wrote:
> Hello, i'am trying to perl code the following ideas i have commented
> as remarks but my attempts were fruitless.
> Its complicated and although i tried to work some code, my code does
> not do what the remarks say.
> #===============================================================================
>
> my @files = glob "$ENV{'DOCUMENT_ROOT'}/data/text/*.txt";
> my @menu_files = map m{([^/]+)\.txt}, @files;
>
> my @dbfiles = $db->do( 'SELECT title, body FROM articles' );
> my $replace = $db->prepare( 'INSERT INTO article (title, body) VALUES
> (?, ?)' );
>
> foreach ( @menu_files ) {
>
> #Check every filename(item in @menu_files) as well as its content
> to see if is already inserted in table articles under columns title
> and body
>
> #============ INSERT NEW FILENAMES & CONTENTS INTO DATABASE IF ANY
> =============
> #If filename and content dont already exist in the db then do
> insert them
>
> #===== UPDATE THE DB ENTRY IF THERE IS A MODIFICATION IN A FILES
> CONTENTS =====
> #If filename exists in the db under column title but its content is
> different from the database's content then update column body in the
> db
>
> #======== DELETE ANY DB ENTRY OF A FILENAME THATDOESNT EXIST ANY
> MORE =========
> #Delete all db records that doesnt have a corresponding filename in
> the hdd
>
> }
It sounds like you just want to make the db match the directories.
Why not just drop the tables and recreate them from your globs?
--S
------------------------------
Date: Wed, 09 Jan 2008 17:47:03 +0100
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: Inserting, update and deleteting a database under conditions
Message-Id: <4eu9o3dnr5p25f9ccus8bo3elet6cip0rr@4ax.com>
On Wed, 9 Jan 2008 05:17:48 -0800 (PST), Nikos <nikos1337@gmail.com>
wrote:
>Hello, i'am trying to perl code the following ideas i have commented
>as remarks but my attempts were fruitless.
Nik,
before reposting your question verbatim here, you should let people
know that you asked it in perlmonks first. So people will know what
that has been told you, and you will save them some duplication of
efforts:
http://perlmonks.org/?node_id=661326
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: Wed, 09 Jan 2008 18:01:06 +0100
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: minicpan, CPAN/CPANPLUS and autobundles on linux
Message-Id: <c4v9o3145s9ca6ldik6ifhius5nr96sajl@4ax.com>
On Sun, 06 Jan 2008 16:30:49 -0800, Joseph Brenner
<doom@kzsu.stanford.edu> wrote:
>> the node seems to have been relatively well received -judging
>> from its XP-
>
>Right. So you're a karma whore?
No, an XP whore. Karma is on use.perl.org! ;)
BTW: in this case XP showed up for what it really should be worth for
- the value of a node.
>Forgive me, but I think my problem was relatively obscure, and I
>can't see why you would be so fascinated by it that you couldn't
>let it rest.
It's been one of the most interesting questions I read in clpmisc in
months, period. (And incidentally a friend of mine, in real life heh,
asked me something along those lines some time before that.) I'm
fairly sick of "how do I get the sixth fielf" kinda questions...
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: Wed, 9 Jan 2008 09:57:01 -0800 (PST)
From: kwan <kwan.jingx@gmail.com>
Subject: Perl Database Programing download for the template
Message-Id: <36a12a65-6686-4363-b2f6-37b08a1eb2d0@l1g2000hsa.googlegroups.com>
Hello!
I have this book, but I couldn't located the template download that
describe in the book. Could anyone point me to the download link for
the template? I appreciate for your help.
------------Book information------
Perl Database Programming
by Brent Michalski ISBN:0764549561
John Wiley & Sons =A9 2003 (552 pages)
Here is an in-depth guide to creating database-driven applications
using Perl
---------------------------------------
Thank you
------------------------------
Date: Wed, 9 Jan 2008 05:02:13 -0800 (PST)
From: Nikos <nikos1337@gmail.com>
Subject: Re: problem when submitting a string through a form
Message-Id: <c0268644-441f-4848-b26b-fb828c0c224c@f47g2000hsd.googlegroups.com>
I decided to try as far as i could to make a single test script, which
i actually embedded into my index.pl file, so to PROVE my initial
guess that there was no need to NOT expect the returned string as
being the same as the original, hence no encoding being necessary to
be performed. Here it is:
if ( param('select') ) { #If user selected an item from the drop down
menu unless( grep /^\Q$article\E$/, @menu_files ) #Unless user
selection doesn't match one of the valid filenames within
@menu_files ......}} print param('select'), ' - ',
length( param('select') ), br() x2; foreach( @menu_files ) { my $match
=3D ($_ eq param('select')) ? "matches" : "fails to match"; print $_, '
- ', length( $_ ), ' - ', $match, br; } Encode::from_to($article,
'utf8', 'ISO-8859-7'); open FILE, "<$ENV{'DOCUMENT_ROOT'}/data/text/
$article.txt" or die $!; ........
[download]
As you can see i'am checking the returned parameter against
@menu_files so to see if when i print them they look the same and when
i also print their lengths they are equal.
The result is the parameter string is identical to its corresponding
item inside @menu_files.
Both strings are perl-internal utf8 flagged strings because when i
print their lengths i get a number twice as much as the chars that
consist the filename. For example if a filename is called "=ED=DF=EA=EF=F2" =
i
get length 10 before and after the submission, which means that both
are stored in a utf8 perl internal manner/way.
So, after this i gather you agree with me that no encoding/decoding
processes being necessary.
------------------------------
Date: Wed, 09 Jan 2008 07:14:54 -0500
From: Bernie Cosell <bernie@fantasyfarm.com>
Subject: Re: Using CPAN "lightweight"
Message-Id: <0je9o3d389k2h3507cl974t48pad5nk349@library.airnews.net>
Ben Morrow <ben@morrow.me.uk> wrote:
} Quoth Bernie Cosell <bernie@fantasyfarm.com>:
} > Is there a way to use the CPAN module *without* its creating a directory
} > and doing all sorts of fancy initialization and such?
} Have you looked at CPANPLUS? It is core as of 5.10, and it was designed
} to be a more programmer-friendly replacement for CPAN.
Ah, no. Didn't know there was such a thing... We're just in the midst of
installing 5.10 so it is probably here on the server *someplace* ...
THANKS!
/Bernie\
--
Bernie Cosell Fantasy Farm Fibers
bernie@fantasyfarm.com Pearisburg, VA
--> Too many people, too few sheep <--
------------------------------
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 1181
***************************************
