[31205] in Perl-Users-Digest
Perl-Users Digest, Issue: 2450 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat May 30 03:09:43 2009
Date: Sat, 30 May 2009 00:09:07 -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 Sat, 30 May 2009 Volume: 11 Number: 2450
Today's topics:
Re: basic directory watcher - sanity check <1usa@llenroc.ude.invalid>
How can I pass a substitution pattern on the command li <newsposter625@gmail.com.invalid>
Re: How can I pass a substitution pattern on the comman <1usa@llenroc.ude.invalid>
Re: How can I pass a substitution pattern on the comman <newsposter625@gmail.com.invalid>
Re: How can I pass a substitution pattern on the comman <someone@example.com>
Re: how can perl respond to someone's HTTP POST <glennj@ncf.ca>
Re: Is PERL good for a linguist new to programming? (Randal L. Schwartz)
Re: Is PERL good for a linguist new to programming? <jurgenex@hotmail.com>
new CPAN modules on Sat May 30 2009 (Randal Schwartz)
OT: E prime and functional programming <cartercc@gmail.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 29 May 2009 19:18:25 GMT
From: "A. Sinan Unur" <1usa@llenroc.ude.invalid>
Subject: Re: basic directory watcher - sanity check
Message-Id: <Xns9C1A9BB594558asu1cornelledu@127.0.0.1>
Jack <jack_posemsky@yahoo.com> wrote in news:ea602f6b-9e5e-41a9-8416-
a245048298ae@b1g2000vbc.googlegroups.com:
> I use activestate and they dont support with my version of perl Cpan
> directory watcher.. is there a better way to watch a directory for a
> file and then process it than the below, perl, shareware, or through a
> low cost product ? The infinite loop code below causes my windows
> server 2003 to have strange behavior after its been running a few days
> (blinking screen, requiring reboot, etc). I know its related b/c when
> this service is stopped, the system is fine. I checked File Monitor
> also but you still need something that continuously checks something,
> the array in its case...
>
> while (1) {
> @filelist=();
> @filelist = split(/\n/, $var = `dir /A-D /B /O-D e:\\mail\inboxes\
> \testbox`);
replace this with
my @filelist = ...;
Now, instead of invoking a shell, you can do:
#!/usr/bin/perl
use strict;
use warnings;
while ( 1 ) {
opendir my $dir, '.';
my @files = grep { ! /^.{1,2}$/ } readdir $dir;
for my $file ( @files ) {
dobasicstuff( $file );
movefile( $file );
}
closedir $dir;
sleep 3;
}
__END__
Alternatively, you can try to use the Win32 API Function
FindFirstChangeNotification
http://msdn.microsoft.com/en-us/library/aa364417(VS.85).aspx
There is a CPAN module to do that:
http://search.cpan.org/~cjm/Win32-IPC-1.07/lib/Win32/ChangeNotify.pm
--
A. Sinan Unur <1usa@llenroc.ude.invalid>
(remove .invalid and reverse each component for email address)
comp.lang.perl.misc guidelines on the WWW:
http://www.rehabitation.com/clpmisc/
------------------------------
Date: Fri, 29 May 2009 15:37:10 -0400
From: P B <newsposter625@gmail.com.invalid>
Subject: How can I pass a substitution pattern on the command line?
Message-Id: <64q5f6xgib.ln2@soren625.no-ip.org>
I'd like to create a (Linux) perl command line utility that creates
subdirectories based on a common part of several filenames and then
moves the corresponding files into them. The command would (ideally)
look something like this:
makesubdirs.pl 's/^([a-zA-Z+)_\d{2}\.[a-zA-Z]{3}$/$1/' *
If it was issued in a directory containing, for example, the following
files:
image01.jpg
image02.jpg
movie01.mpg
movie02.mpg
it would create an 'image' subdirectory and a 'movie' subdirectory and
move the files, etc., you get the idea.
So, how can I pass the whole s/// operator to the program, to be used
(presumably) thusly (to continue the example used above):
my $pattern = shift @ARGV;
my $subdirectory =~ $pattern;
... and so on to create the subdirectories, etc.?
Thank you.
------------------------------
Date: Fri, 29 May 2009 20:10:27 GMT
From: "A. Sinan Unur" <1usa@llenroc.ude.invalid>
Subject: Re: How can I pass a substitution pattern on the command line?
Message-Id: <Xns9C1AA4876B258asu1cornelledu@127.0.0.1>
P B <newsposter625@gmail.com.invalid> wrote in news:64q5f6xgib.ln2
@soren625.no-ip.org:
> I'd like to create a (Linux) perl command line utility that creates
> subdirectories based on a common part of several filenames and then
> moves the corresponding files into them. The command would (ideally)
> look something like this:
>
> makesubdirs.pl 's/^([a-zA-Z+)_\d{2}\.[a-zA-Z]{3}$/$1/' *
>
> If it was issued in a directory containing, for example, the following
> files:
>
> image01.jpg
> image02.jpg
> movie01.mpg
> movie02.mpg
>
> it would create an 'image' subdirectory and a 'movie' subdirectory and
> move the files, etc., you get the idea.
>
> So, how can I pass the whole s/// operator to the program, to be used
> (presumably) thusly (to continue the example used above):
First, you don't need substitution. You need to capture matches.
Second, just pass the pattern string to the program.
[sinan@kas ~]$ cat s.pl
#!/usr/bin/perl
use strict;
use warnings;
my $pattern = shift @ARGV;
my $re = qr/$pattern/;
for my $arg ( @ARGV ) {
if ( my @parts = ( $arg =~ $re ) ) {
my $subdir = join q{}, @parts;
# put actual code to mkdir, move etc
print "$arg goes in $subdir\n";
}
}
__END__
[sinan@kas ~]$ perl s.pl '\.(\w{1,3})$' *
wallpaper.png goes in png
test.zip goes in zip
etc.zip goes in zip
s.pl goes in pl
t.pl goes in pl
www.zip goes in zip
--
A. Sinan Unur <1usa@llenroc.ude.invalid>
(remove .invalid and reverse each component for email address)
comp.lang.perl.misc guidelines on the WWW:
http://www.rehabitation.com/clpmisc/
------------------------------
Date: Fri, 29 May 2009 23:05:26 -0400
From: P B <newsposter625@gmail.com.invalid>
Subject: Re: How can I pass a substitution pattern on the command line?
Message-Id: <mck6f6xoan.ln2@soren625.no-ip.org>
On 2009-05-29, A. Sinan Unur <1usa@llenroc.ude.invalid> wrote in
comp.lang.perl.misc:
> First, you don't need substitution. You need to capture matches.
> Second, just pass the pattern string to the program.
> [sinan@kas ~]$ cat s.pl
> #!/usr/bin/perl
> use strict;
> use warnings;
> my $pattern = shift @ARGV;
> my $re = qr/$pattern/;
> for my $arg ( @ARGV ) {
> if ( my @parts = ( $arg =~ $re ) ) {
> my $subdir = join q{}, @parts;
> # put actual code to mkdir, move etc
> print "$arg goes in $subdir\n";
> }
> }
> __END__
> [sinan@kas ~]$ perl s.pl '\.(\w{1,3})$' *
> wallpaper.png goes in png
> test.zip goes in zip
> etc.zip goes in zip
> s.pl goes in pl
> t.pl goes in pl
> www.zip goes in zip
Very Nice. Thank you. I have something similar (though much, much
cruder, and probably much slower) working now, but I'll put your
suggestions to good use.
Now if you don't mind, for my edification, two questions:
What is the 'if' statement testing? What is
( @parts = ( $arg =~ $re ) )
doing? What values is @parts being populated with?
What exactly is the q{} operator doing in the join statement? What is
its content, so to speak? Is it just the same as '' here?
Thanks again for your advice. I'm slowly picking up 'idiomatic perl', so
I'm always eager to learn new things.
On a side note, how /would/ one pass a whole s/// operator on the
command line (sed-style, I guess), supposing you wanted to do
interesting things with backreferences, the g and i modifiers, etc.?
------------------------------
Date: Fri, 29 May 2009 21:17:47 -0700
From: "John W. Krahn" <someone@example.com>
Subject: Re: How can I pass a substitution pattern on the command line?
Message-Id: <Lr2Ul.115108$i24.25306@newsfe14.iad>
P B wrote:
> On 2009-05-29, A. Sinan Unur <1usa@llenroc.ude.invalid> wrote in
> comp.lang.perl.misc:
>> First, you don't need substitution. You need to capture matches.
>> Second, just pass the pattern string to the program.
>
>> [sinan@kas ~]$ cat s.pl
>> #!/usr/bin/perl
>
>> use strict;
>> use warnings;
>
>> my $pattern = shift @ARGV;
>> my $re = qr/$pattern/;
>
>> for my $arg ( @ARGV ) {
>> if ( my @parts = ( $arg =~ $re ) ) {
>> my $subdir = join q{}, @parts;
>> # put actual code to mkdir, move etc
>> print "$arg goes in $subdir\n";
>> }
>> }
>
>> __END__
>
>> [sinan@kas ~]$ perl s.pl '\.(\w{1,3})$' *
>> wallpaper.png goes in png
>> test.zip goes in zip
>> etc.zip goes in zip
>> s.pl goes in pl
>> t.pl goes in pl
>> www.zip goes in zip
>
> Very Nice. Thank you. I have something similar (though much, much
> cruder, and probably much slower) working now, but I'll put your
> suggestions to good use.
>
> Now if you don't mind, for my edification, two questions:
>
> What is the 'if' statement testing? What is
> ( @parts = ( $arg =~ $re ) )
> doing? What values is @parts being populated with?
$re is the regular expression '\.(\w{1,3})$'. $arg is a file name. $re
is matched against $arg and everything inside capturing parentheses is
returned and stored in @parts. If @parts is empty then it is false and
the next file name is processed.
> What exactly is the q{} operator doing in the join statement? What is
> its content, so to speak? Is it just the same as '' here?
q{} is exactly the same as ''.
> Thanks again for your advice. I'm slowly picking up 'idiomatic perl', so
> I'm always eager to learn new things.
>
>
> On a side note, how /would/ one pass a whole s/// operator on the
> command line (sed-style, I guess), supposing you wanted to do
> interesting things with backreferences, the g and i modifiers, etc.?
perldoc -q "How can I expand variables in text strings"
John
--
Those people who think they know everything are a great
annoyance to those of us who do. -- Isaac Asimov
------------------------------
Date: 29 May 2009 19:19:09 GMT
From: Glenn Jackman <glennj@ncf.ca>
Subject: Re: how can perl respond to someone's HTTP POST
Message-Id: <slrnh20d9e.p82.glennj@smeagol.ncf.ca>
At 2009-05-29 12:05PM, "Jack" wrote:
> Thanks ! actually it will output XML, but just knowing how to output
> anything is a start - what is the code I need to provide so this
> happens ?? My ASP page does a database lookup, then what is the code
> I need to hand off the contents of these variables to something ??
"Plz email me teh codez"
Since you're in a Perl newsgroup here, i'd start with the magic code
"print $var"
--
Glenn Jackman
Write a wise saying and your name will live forever. -- Anonymous
------------------------------
Date: Fri, 29 May 2009 11:38:59 -0700
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: Is PERL good for a linguist new to programming?
Message-Id: <86ab4v69fg.fsf@blue.stonehenge.com>
>>>>> "Peter" == Peter J Holzer <hjp-usenet2@hjp.at> writes:
Peter> I disagree with that, actually. When you ask a specific question on
Peter> Usenet, there is no guarantee that this question is answered at all and
Peter> if it is you probably get at least three different answers and still
Peter> have to decide which one (if any) is correct.
Yes, welcome to community support. :) Then again, if you called a company
phone support line, you'd probably get the same accuracy. :)
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: Fri, 29 May 2009 14:01:44 -0700
From: Jürgen Exner <jurgenex@hotmail.com>
Subject: Re: Is PERL good for a linguist new to programming?
Message-Id: <29j0255mhhh0fi0ik0oqpbthdps24kdnoi@4ax.com>
"Peter J. Holzer" <hjp-usenet2@hjp.at> wrote:
>On 2009-05-28 20:44, Jürgen Exner <jurgenex@hotmail.com> wrote:
>> "Uri Guttman" <uri@StemSystems.com> wrote:
>>> FS> Uri and his ilk are why I would advise against thinking you can
>>> FS> conquer the many idioms of perl by relying on usenet.
>>
>> Actually Usenet is a poorly suited medium to learn any task. Books,
>> videos, classes, tutorials, one-on-one tutoring, ..., pretty much
>> anything is far more effective than Usenet posts when it comes to
>> learning a particular skill.
>>
>> On the other hand Usenet is a terrific resource for finding answers to
>> specific questions.
>
>I disagree with that, actually. When you ask a specific question on
>Usenet, there is no guarantee that this question is answered at all and
>if it is you probably get at least three different answers and still
>have to decide which one (if any) is correct.
>
>I think Usenet is a great discussion medium. As a discussion medium it
>is a great tool to learn more about about a field in which you already
>have at least basic knowledge. No so much by asking specific questions
>than by discussing things, thinking about the questions and answers
>given by others, and researching the topics mentioned in discussions.
You are right, very good point!
jue
------------------------------
Date: Sat, 30 May 2009 04:42:28 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Sat May 30 2009
Message-Id: <KKFx2s.20zB@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-6502-0.75
http://search.cpan.org/~andya/Acme-6502-0.75/
Pure Perl 65C02 simulator.
----
Acme-MirrorTracer-2009.052920495001
http://search.cpan.org/~andya/Acme-MirrorTracer-2009.052920495001/
Do nothing.
----
Alien-Win32-LZMA-4.66
http://search.cpan.org/~adamk/Alien-Win32-LZMA-4.66/
Install and make available lzma.exe
----
App-Sequence-0.0504
http://search.cpan.org/~kimoto/App-Sequence-0.0504/
subroutine engine
----
Bundle-DBD-PO-2.07
http://search.cpan.org/~steffenw/Bundle-DBD-PO-2.07/
A bundle to install all DBD::PO related modules
----
CGI-DataObjectMapper-0.0106
http://search.cpan.org/~kimoto/CGI-DataObjectMapper-0.0106/
Data-Object Mapper for CGI form data
----
CGI-DataObjectMapper-0.0107
http://search.cpan.org/~kimoto/CGI-DataObjectMapper-0.0107/
Data-Object Mapper for CGI form data
----
CPAN-Mini-Inject-0.25
http://search.cpan.org/~andya/CPAN-Mini-Inject-0.25/
Inject modules into a CPAN::Mini mirror.
----
CPANPLUS-Dist-Arch-0.10
http://search.cpan.org/~juster/CPANPLUS-Dist-Arch-0.10/
CPANPLUS backend for building Archlinux pacman packages
----
Catalyst-Controller-SOAP-1.15
http://search.cpan.org/~druoso/Catalyst-Controller-SOAP-1.15/
Catalyst SOAP Controller
----
Catalyst-Plugin-Unicode-Encoding-0.3
http://search.cpan.org/~mramberg/Catalyst-Plugin-Unicode-Encoding-0.3/
Unicode aware Catalyst
----
Class-Std-Slots-0.31
http://search.cpan.org/~andya/Class-Std-Slots-0.31/
Provide signals and slots for standard classes.
----
Config-JFDI-0.062
http://search.cpan.org/~rkrimen/Config-JFDI-0.062/
Just * Do it: A Catalyst::Plugin::ConfigLoader-style layer over Config::Any
----
Coro-5.132
http://search.cpan.org/~mlehmann/Coro-5.132/
the only real threads in perl
----
Crypt-PerfectPaperPasswords-0.06
http://search.cpan.org/~andya/Crypt-PerfectPaperPasswords-0.06/
Steve Gibson's Perfect Paper Passwords
----
DBD-PO-2.07
http://search.cpan.org/~steffenw/DBD-PO-2.07/
DBI driver for PO files
----
DBIx-Perlish-0.53
http://search.cpan.org/~gruber/DBIx-Perlish-0.53/
a perlish interface to SQL databases
----
Data-Find-0.03
http://search.cpan.org/~andya/Data-Find-0.03/
Find data in arbitrary data structures
----
Data-Object-AutoWrap-0.02
http://search.cpan.org/~andya/Data-Object-AutoWrap-0.02/
Autogenerate accessors for R/O object data
----
Dir-Project-3.014
http://search.cpan.org/~wsnyder/Dir-Project-3.014/
Project Environment determination
----
Elive-0.23
http://search.cpan.org/~warringd/Elive-0.23/
Elluminate Live (c) client library
----
Exception-Class-Nested-0.03
http://search.cpan.org/~jenda/Exception-Class-Nested-0.03/
Nested declaration of Exception::Class classes
----
GPS-Babel-0.11
http://search.cpan.org/~andya/GPS-Babel-0.11/
Perl interface to gpsbabel
----
Geo-Coordinates-ITM-0.02
http://search.cpan.org/~andya/Geo-Coordinates-ITM-0.02/
Convert coordinates between lat/lon and Irish Transverse Mercator
----
Geo-Gpx-0.26
http://search.cpan.org/~andya/Geo-Gpx-0.26/
Create and parse GPX files.
----
Grid-Request-0.2
http://search.cpan.org/~victorf/Grid-Request-0.2/
An API for submitting jobs to a computational grid such as SGE or Condor.
----
HTML-Element-Library-3.53
http://search.cpan.org/~tbone/HTML-Element-Library-3.53/
HTML::Element convenience functions
----
HTML-Element-Replacer-0.01
http://search.cpan.org/~tbone/HTML-Element-Replacer-0.01/
simplify the HTML::Element clone() - push_content() ritual
----
HTML-Seamstress-5.0c
http://search.cpan.org/~tbone/HTML-Seamstress-5.0c/
HTML::Tree subclass for HTML templating via tree rewriting
----
HTML-WikiConverter-MediaWiki-0.59
http://search.cpan.org/~diberri/HTML-WikiConverter-MediaWiki-0.59/
Convert HTML to MediaWiki markup
----
Heap-MinMax-1.01
http://search.cpan.org/~mbeebe/Heap-MinMax-1.01/
Min-Max Heap for Priority Queues etc.
----
LaTeX-Table-0.9.15
http://search.cpan.org/~limaone/LaTeX-Table-0.9.15/
Perl extension for the automatic generation of LaTeX tables.
----
Lingua-Abbreviate-Hierarchy-0.01
http://search.cpan.org/~andya/Lingua-Abbreviate-Hierarchy-0.01/
Shorten verbose namespaces
----
MooseX-Has-Sugar-0.0300
http://search.cpan.org/~kentnl/MooseX-Has-Sugar-0.0300/
Sugar Syntax for moose 'has' fields.
----
Muldis-D-0.75.0
http://search.cpan.org/~duncand/Muldis-D-0.75.0/
Formal spec of Muldis D relational DBMS lang
----
Net-FTPSSL-0.09
http://search.cpan.org/~cleach/Net-FTPSSL-0.09/
A FTP over SSL/TLS class
----
Net-Jabber-Bot-2.1.1
http://search.cpan.org/~toddr/Net-Jabber-Bot-2.1.1/
Automated Bot creation with safeties
----
Net-Jabber-Bot-2.1.2
http://search.cpan.org/~toddr/Net-Jabber-Bot-2.1.2/
Automated Bot creation with safeties
----
Net-SFTP-SftpServer-1.0.3
http://search.cpan.org/~simm/Net-SFTP-SftpServer-1.0.3/
A Perl implementation of the SFTP subsystem with user access controls
----
Net-SFTP-SftpServer-1.0.4
http://search.cpan.org/~simm/Net-SFTP-SftpServer-1.0.4/
A Perl implementation of the SFTP subsystem with user access controls
----
Net-UCP-0.40
http://search.cpan.org/~nemux/Net-UCP-0.40/
Perl extension for EMI - UCP Protocol.
----
Number-Closest-0.01
http://search.cpan.org/~tbone/Number-Closest-0.01/
find number(s) closest to a number in a list of numbers
----
Object-Lazy-0.05
http://search.cpan.org/~steffenw/Object-Lazy-0.05/
create objects late from non-owned classes
----
Object-Simple-0.0203
http://search.cpan.org/~kimoto/Object-Simple-0.0203/
Light Weight Minimal Object System
----
Object-Simple-0.0204
http://search.cpan.org/~kimoto/Object-Simple-0.0204/
Light Weight Minimal Object System
----
Object-Simple-Mixin-AttrOptions-0.0202
http://search.cpan.org/~kimoto/Object-Simple-Mixin-AttrOptions-0.0202/
Mixin class to get attribute options for Object::Simple
----
Object-Simple-Mixin-Meta-0.0101
http://search.cpan.org/~kimoto/Object-Simple-Mixin-Meta-0.0101/
Mixin to get Object::Simple meta information
----
POE-Component-IRC-6.08
http://search.cpan.org/~hinrik/POE-Component-IRC-6.08/
A fully event-driven IRC client module
----
POE-Filter-CSV-1.16
http://search.cpan.org/~bingos/POE-Filter-CSV-1.16/
A POE-based parser for CSV based files.
----
POE-Filter-CSV_XS-1.16
http://search.cpan.org/~bingos/POE-Filter-CSV_XS-1.16/
A POE-based parser for CSV based files.
----
POE-Filter-Zlib-2.02
http://search.cpan.org/~bingos/POE-Filter-Zlib-2.02/
A POE filter wrapped around Compress::Zlib
----
Padre-0.36
http://search.cpan.org/~therek/Padre-0.36/
Perl Application Development and Refactoring Environment
----
Padre-Plugin-Ecliptic-0.03
http://search.cpan.org/~azawawi/Padre-Plugin-Ecliptic-0.03/
Padre plugin that provides Eclipse killer features
----
Parallel-Depend-4.05
http://search.cpan.org/~lembark/Parallel-Depend-4.05/
: Parallel-dependent dispatch of perl or shell code.
----
Perl-Critic-Itch-0.06
http://search.cpan.org/~marcelo/Perl-Critic-Itch-0.06/
A collection of Perl::Critic Policies to solve some Itches
----
Perl-Dist-WiX-0.183
http://search.cpan.org/~csjewell/Perl-Dist-WiX-0.183/
Experimental 4th generation Win32 Perl distribution builder
----
Statistics-Basic-1.6500
http://search.cpan.org/~jettero/Statistics-Basic-1.6500/
A collection of very basic statistics modules
----
Statistics-Descriptive-3.0000
http://search.cpan.org/~shlomif/Statistics-Descriptive-3.0000/
Module of basic descriptive statistical functions.
----
Storable-AMF-0.63
http://search.cpan.org/~grian/Storable-AMF-0.63/
Perl extension for serialize/deserialize AMF0/AMF3 data
----
Syntax-Highlight-Perl6-0.58
http://search.cpan.org/~azawawi/Syntax-Highlight-Perl6-0.58/
Perl 6 Syntax Highlighter
----
Sys-Statistics-Linux-0.51_01
http://search.cpan.org/~bloonix/Sys-Statistics-Linux-0.51_01/
Front-end module to collect system statistics
----
Task-BeLike-BINGOS-1.04
http://search.cpan.org/~bingos/Task-BeLike-BINGOS-1.04/
Be the most BINGOS you can be
----
TaskForest-1.33
http://search.cpan.org/~enoor/TaskForest-1.33/
A simple but expressive job scheduler that allows you to chain jobs/tasks and create time dependencies. Uses text config files to specify task dependencies.
----
Text-Editor-Easy-0.47
http://search.cpan.org/~grommier/Text-Editor-Easy-0.47/
A perl module to edit perl code with syntax highlighting and more.
----
Tie-Sub-0.09
http://search.cpan.org/~steffenw/Tie-Sub-0.09/
Tying a subroutine, function or method to a hash
----
Tree-AVL-1.01
http://search.cpan.org/~mbeebe/Tree-AVL-1.01/
An AVL (balanced binary) tree for time efficient storage and retrieval of comparable objects
----
Tree-AVL-1.02
http://search.cpan.org/~mbeebe/Tree-AVL-1.02/
An AVL (balanced binary) tree for time efficient storage and retrieval of comparable objects
----
Tree-AVL-1.04
http://search.cpan.org/~mbeebe/Tree-AVL-1.04/
An AVL (balanced binary) tree for time-efficient storage and retrieval of comparable objects
----
UR-Bundle-0.3
http://search.cpan.org/~sakoht/UR-Bundle-0.3/
----
URI-geo-0.05
http://search.cpan.org/~andya/URI-geo-0.05/
The geo URI scheme.
----
Unicode-LineBreak-0.005.510
http://search.cpan.org/~nezumi/Unicode-LineBreak-0.005.510/
UAX #14 Unicode Line Breaking Algorithm
----
XML-Descent-1.04
http://search.cpan.org/~andya/XML-Descent-1.04/
Recursive descent XML parsing
----
typo2mt-0.02
http://search.cpan.org/~pioto/typo2mt-0.02/
takes a typo database and converts it to a Movable Type import file
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: Fri, 29 May 2009 14:03:01 -0700 (PDT)
From: ccc31807 <cartercc@gmail.com>
Subject: OT: E prime and functional programming
Message-Id: <395c2fd2-b2db-4462-a242-b6616be26658@z14g2000yqa.googlegroups.com>
This post does not conform to the posting guidelines, so if that
bothers you, read no further.
For several decades I have tried to practice E prime, off and on. When
writing a really formal paper, I usually go to great lengths to write
in E prime, and occasionally I practice E prime in less formal
settings to keep in practice. E prime consists of using a subset of
English without any form of the verb 'to be', promoted by the school
of general semantics, and I find that communicating in this style
enforces particular disciplines that sharpen both thinking and
writing.
In Joe Armstrong's book Programming Erlang, page 1, he gives this as a
reason for learning Erlang, "You've heard about "functional
programming" and you're wondering whether the techniques really work."
Later on, on pages 17ff, he discusses Erlang variables that don't vary
and the = operator that doesn't assign. He makes the point throughout
his book that a functional style substantially improves code.
For several years I have attempted to incorporate a more functional
style in everyday programming, much as I have attempted to use E prime
in writing. I've studied the usual suspects, Scheme, Common Lisp,
Erlang, Clojure, and even Perl (under the influence of MJD's Higher
Order Perl.
Has anyone tried to discipline his writing with E prime, or (more
likely) his coding in a functional style? Seems to me that both of
these disciplines require a similar amount of effort (which means that
you don't bother for ordinary tasks) but that both return the same
kind of reward.
I've spent most of the day on a new database project (using Perl),
catching up on c.l.p.m., decompressing a bit -- and posting an obvious
OT message to c.l.p.m. for no reason other than ignorance of any more
appropriate group. Forgive me.
CC.
------------------------------
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 2450
***************************************
