[30529] in Perl-Users-Digest
Perl-Users Digest, Issue: 1772 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Aug 6 06:09:59 2008
Date: Wed, 6 Aug 2008 03:09:26 -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 Wed, 6 Aug 2008 Volume: 11 Number: 1772
Today's topics:
Re: .gz and .bz2 files on the Perl command line <paul.marquess@btinternet.com>
Re: bidding advice for a contract <cwilbur@chromatico.net>
Re: bidding advice for a contract <cwilbur@chromatico.net>
Re: bidding advice for a contract <RedGrittyBrick@SpamWeary.foo>
Re: CLPM - a help group? <worrall+unet@cs.bris.ac.uk>
Re: FAQ 4.36 How can I expand variables in text strings <whynot@pozharski.name>
Re: FAQ 4.36 How can I expand variables in text strings <ben@morrow.me.uk>
How to check for filetype existence quickly <fidokomik@gmail.com>
Re: How to check for filetype existence quickly <usenet@larseighner.com>
Re: How to check for filetype existence quickly <RedGrittyBrick@SpamWeary.foo>
How to flush STDIN with getc()? <usenet@larseighner.com>
new CPAN modules on Wed Aug 6 2008 (Randal Schwartz)
Newbie: Simple conditional on regexp match <kenneth.brun.nielsen@googlemail.com>
Re: PPM - scripting <ben@morrow.me.uk>
Re: session <dev.b.85@gmail.com>
Re: session <dev.b.85@gmail.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 06 Aug 2008 09:49:21 +0100
From: Paul Marquess <paul.marquess@btinternet.com>
Subject: Re: .gz and .bz2 files on the Perl command line
Message-Id: <489964c5$0$656$4d4eb98e@read.news.uk.uu.net>
Ted Zlatanov wrote:
> Say I have this program call
>
> go.pl A B C.gz D.bz2
>
> I'd like to just use <> in go.pl and have the compressed files
> automatically extracted. Is there a way to do that without writing my
> own logic, as a module I can bring in? This is a read-only task. I
> couldn't find anything on CPAN.
>
> Thanks
> Ted
If you have IO::Uncompress::Zlib & IO::Uncompress::Bunzip2, then the code
below will allow you to read .gz , .bz2, .zip etc plus non-compressed files
as well.
use IO::Uncompress::AnyUncompress;
for my $file (@ARGV)
{
my $fh = new IO::Uncompress::AnyUncompress $file, Transparent => 1
or die "Cannot open $file: $AnyUncompressError\n";
while (<$fh>)
{
# whatever
}
}
The trick is to include the 'Transparent' option when using
IO::Uncompress::AnyUncompress. That will get it to read uncompressed files
if it doesn't detect any compression.
Paul
------------------------------
Date: Wed, 06 Aug 2008 00:44:27 -0400
From: Charlton Wilbur <cwilbur@chromatico.net>
Subject: Re: bidding advice for a contract
Message-Id: <86promrbv8.fsf@mithril.chromatico.net>
>>>>> "cc" == cartercc <cartercc@gmail.com> writes:
cc> On Aug 5, 2:10 pm, Charlton Wilbur <cwil...@chromatico.net> wrote:
>> You've got no clear requirements and no clear scope, but any
>> estimate you make is going to be treated as a solemn promise.
cc> This thread got me to print out a copy of IEEE Std 830 and read
cc> through it again. Yeah, IEEE says that requirements
cc> specifications should be detailed enough to directly code from
cc> it, but how often do we get detailed specifications in a small
cc> shop?
There's a huge difference between having enough of a sense of the scope
and requirements to be able to determine whether the project should take
six weeks, six months, or six years, and having a spec detailed enough
to code from.
I pointed out that you are in the former situation, and that signing a
contract means that you take the blame when you don't deliver what they
wanted (but never specified - you have no clear sense of the
requirements) on a certain deadline (which may or may not be an
impossible task - you have no clear idea what the scope is).
It is true but irrelevant that the latter situation is frequently
unattainable.
Charlton
--
Charlton Wilbur
cwilbur@chromatico.net
------------------------------
Date: Wed, 06 Aug 2008 00:53:45 -0400
From: Charlton Wilbur <cwilbur@chromatico.net>
Subject: Re: bidding advice for a contract
Message-Id: <86ljzarbfq.fsf@mithril.chromatico.net>
>>>>> "cc" == cartercc <cartercc@gmail.com> writes:
cc> I do this sort of thing for a living, already having a full time
cc> job, so I have a substantial code base already. It's not like
cc> I'll be writing this from scratch.
>> This sounds like an intellectual-property lawsuit waiting to
>> happen.
cc> I doubt that this would be the case. I work for a large public
cc> university in my day job, and the code I have written
cc> specfically for work assignments is no inextricably combined
cc> with code that I have written for pleasure and outside work that
cc> I don't see how it could be traced.
This is extremely unprofessional behavior, *because* of the intellectual
property issues it creates. There should be a clear line between what
the university owns and what you own, and the difference should be made
clear in writing.
>> Unless you have a contract saying otherwise or you're operating
>> under a very unusual legal code, the code you write as part of
>> our employment is considered work for hire, and you do not retain
>> any rights to it. Borrowing code from one employer to give to
>> another employer is highly inappropriate unless both employers
>> know about it.
cc> What if my employer 'borrowed' it from me? What if I took an
cc> application that I had written years earlier and adapted it to a
cc> current project at work? With all respect, I think this sort of
cc> concern is arrant nonsense, at least given the employers and the
cc> personalities that I work for.
When your employer pays you to do the work, in the absence of a contract
to the contrary, the code you write is the intellectual property of the
employer. If you do not want this to be the case, you need to get
something in writing from your employer that says otherwise.
In particular, if you take code that belongs to your current employer
and use it for your new employer, you are violating intellectual
property rights and exposing both your old employer and your new
employer to lawsuits. You don't have the rights to the code you wrote
for hire; your current employer would need to license the code to your
new employer.
You may find it arrant nonsense, but for the most part, it's the law,
and you have a professional obligation to behave ethically. Playing
fast and loose with this sort of thing is a very good way to torpedo
your consulting career before it gets off the ground.
Charlton
--
Charlton Wilbur
cwilbur@chromatico.net
------------------------------
Date: Wed, 06 Aug 2008 10:55:59 +0100
From: RedGrittyBrick <RedGrittyBrick@SpamWeary.foo>
Subject: Re: bidding advice for a contract
Message-Id: <48997530$0$2510$da0feed9@news.zen.co.uk>
Willem wrote:
> Charlton Wilbur wrote:
> )>>>>> "cc" == cartercc <cartercc@gmail.com> writes:
> )
> ) cc> I do this sort of thing for a living, already having a full time
> ) cc> job, so I have a substantial code base already. It's not like
> ) cc> I'll be writing this from scratch.
> )
> ) This sounds like an intellectual-property lawsuit waiting to happen.
> )
> ) Unless you have a contract saying otherwise or you're operating under a
> ) very unusual legal code, the code you write as part of our employment is
> ) considered work for hire, and you do not retain any rights to it.
>
> And if the code is written beforehand, and then used in the contract for
> your company ? As in, I write a nice codebase/library in my free time,
> tweak it until it suits me, and then I fullfill contracts by putting
> together pieces from my codebase that fit the specs.
In the jurisdiction in which I live and work, I'd want a clear contract
between me and my employer that makes it clear who owns (copyright in)
any code I develop at work, at home or elsewhere. Otherwise the employer
might reasonably expect that they own any code I put into software for them.
I'd want wording that said ACME SpaceCars Inc is buying a licence for
J.Random.Developer's Foo and Bar libraries and that all rights in those
libraries remain the property of J.Random.Developer. I might consider
lodging the source of those libraries in escrow so that I can prove what
they consisted of at the time of the agreement. There's still a probable
grey area if you improve the libraries in the course of applying them to
the employer's applications.
> Just a legal question that came to me when reading your comment.
My legal advice is worth about what I'm charging you for it!
--
RGB
------------------------------
Date: Tue, 05 Aug 2008 23:27:38 -0700
From: Adam Worrall <worrall+unet@cs.bris.ac.uk>
Subject: Re: CLPM - a help group?
Message-Id: <vvbmk.16412$xZ.9861@nlpi070.nbdc.sbc.com>
Michael Carman wrote:
> Adam Worrall wrote:
>> Yes I meant 'help desk', but you are wrong in assuming that a 'help
>> desk' always has to be a formal service for customers. There are, in
>> fact, many volunteer-run help desk, and this newsgroup, like many
>> others, functions as exactly that. People volunteer their time to
>> _help_ others.
>
> I believe that the aversion to calling c.l.p.misc a "help desk" is
> because that term carries a connotation that the purpose of the group is
> to provide a service where someone will solve your problem for you. The
> regular contributors to this group are, on the whole, very resistant to
> that idea. "RTFM. What have you tried? Show us your code."
>
> nobull phrased it very well:
>
> "Get real! This is a discussion group, not a helpdesk. You post
> something, we discuss its implications. If the discussion happens
> to answer a question you've asked, that's incidental."
>
> The purpose of the group is to discuss Perl: it's strengths, weaknesses,
> idioms, quirks, dusty corners, etc. The asking and answering of
> questions are merely a mechanism by which discussion topics are identified.
I understand what you are saying, but it still doesn't answer my
question: who exactly gets to decide what is and isn't acceptable for
everyone in a news group? AKAIK, no one simple person can claim
ownership of a news group, so telling someone something along the lines
of "this is not a help desk" is legislating your own beliefs, which is
contrary to what Usenet is and how it works (at least in terms of open
non-moderated groups.)
- Adam
------------------------------
Date: Tue, 05 Aug 2008 22:48:00 +0300
From: Eric Pozharski <whynot@pozharski.name>
Subject: Re: FAQ 4.36 How can I expand variables in text strings?
Message-Id: <gcnmm5x06a.ln2@carpet.zombinet>
brian d foy <brian.d.foy@gmail.com> wrote:
> In article <tqmim5xmel.ln2@carpet.zombinet>, Eric Pozharski
> <whynot@pozharski.name> wrote:
>> brian d foy <brian.d.foy@gmail.com> wrote:
>> > In article <fc8cm5xnc2.ln2@carpet.zombinet>, Eric Pozharski
>> > <whynot@pozharski.name> wrote:
>> >> npc <npc@zomg.tk> wrote:
>> >> > On Fri, 01 Aug 2008 06:03:03 -0700, PerlFAQ Server wrote:
>> >> >> 4.36: How can I expand variables in text strings?
>> >> > I don't understand this faq entry. I'm probably
>> >> > misunderstanding it.
>> >> Never mind. It's a ping-pong FAQ.
>> > I'm not familiar with " ping-pong FAQ". Can you explain that?
>> That was paraphrased from C<ping-pong thread>. I admit, that this
>> particular entry doesn't go that far though.
> And what does ping-pong thread mean? I still don't get what you are
> pointing out about the answer that I might need to fix.
=item To: *
C<ping-pong whatever> means a contents where participants attempt to
find as many ways to achieve something using some tools. In context of
c.l.p.m the only tool used is Perl obviously. Is my understanding
right?
=item To: brian d foy
Please note, that B<both> my remarks was written in state of
misunderstanding what the question is. Decreasing signal/noise ratio is
the way my head works. Sorry. (As a gift, even year ago, I was much
more noisy.) Sometimes (as was my first remark) that happens again.
=back
> [snip]
>> A-ha, now I see what I've missed. However than, please note that
>> that entry misses a bit of explanation why using C<qq()> doesn't
>> count as expansion.
> Are we talking about the same answer? This one doesn't use qq().
Take a look at that part of answer (yes, it's taken out of context, but
that's what reader sees first):
my $foo = 'Fred';
my $bar = 'Barney';
$string = 'Say hello to $foo and $bar';
The question states C<How can I expand variables in text strings?>. The
unexpert reader (me?) doesn't get why C<q()> is used in place of
C<qq()>. The latter perfectly expands I<$foo> and I<$bar>.
May be I've missed something again, but I failed to find in neither
question nor answer any notion that I<$foo> and I<$bar> are undefined at
compile time. BTW, the answer misses either discussion or redirection
why C<$string = eval { "Say hello to $foo and $bar"; };> is bad.
--
Torvalds' goal for Linux is very simple: World Domination
------------------------------
Date: Wed, 6 Aug 2008 04:46:39 +0100
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: FAQ 4.36 How can I expand variables in text strings?
Message-Id: <vdjnm5-kps.ln1@osiris.mauzo.dyndns.org>
Quoth Eric Pozharski <whynot@pozharski.name>:
>
> Take a look at that part of answer (yes, it's taken out of context, but
> that's what reader sees first):
>
> my $foo = 'Fred';
> my $bar = 'Barney';
> $string = 'Say hello to $foo and $bar';
>
> The question states C<How can I expand variables in text strings?>. The
> unexpert reader (me?) doesn't get why C<q()> is used in place of
> C<qq()>. The latter perfectly expands I<$foo> and I<$bar>.
The (implicit) assumption is that $string is *not* literally specified
in the program source, but comes from somewhere else: perhaps user
input, perhaps a data file. So the fact qq-expansion hasn't been applied
is part of the spec, and the question could be rephrased 'how can I
emulate what Perl does when I use qq()?'.
> May be I've missed something again, but I failed to find in neither
> question nor answer any notion that I<$foo> and I<$bar> are undefined at
> compile time. BTW, the answer misses either discussion or redirection
> why C<$string = eval { "Say hello to $foo and $bar"; };> is bad.
Since that quoted string can never throw an exception[0], the eval {} is
completely useless. You possibly meant eval STRING rather than eval
BLOCK: since the /ee modifier on a substitution performs an eval STRING,
this is what the first answer suggests.
[0] well, unless $foo or $bar is tied or an object with string
overloading, I suppose...
Ben
--
For the last month, a large number of PSNs in the Arpa[Inter-]net have been
reporting symptoms of congestion ... These reports have been accompanied by an
increasing number of user complaints ... As of June,... the Arpanet contained
47 nodes and 63 links. [ftp://rtfm.mit.edu/pub/arpaprob.txt] * ben@morrow.me.uk
------------------------------
Date: Wed, 6 Aug 2008 01:32:09 -0700 (PDT)
From: fidokomik <fidokomik@gmail.com>
Subject: How to check for filetype existence quickly
Message-Id: <6d9d54ba-0b32-4868-a244-0f364a8c8f99@y21g2000hsf.googlegroups.com>
I have directory, say "c:\documents" on Windows or "/home/petr/
documents" on Linux. In this directory many files are stored with many
filetypes (extensions), say *.doc, *.txt, *.zip. I need to find fastes
way how to check if some filetype exist. Now I use routine where I use
readdir() and return true if passed filetype is first time found but
when I have huge number of files but passed filetype is not found then
routine is very slow before return false.
Any idea?
------------------------------
Date: Wed, 6 Aug 2008 10:02:15 +0000 (UTC)
From: Lars Eighner <usenet@larseighner.com>
Subject: Re: How to check for filetype existence quickly
Message-Id: <slrng9itbg.1q3o.usenet@debranded.larseighner.com>
In our last episode,
<6d9d54ba-0b32-4868-a244-0f364a8c8f99@y21g2000hsf.googlegroups.com>,
the lovely and talented fidokomik
broadcast on comp.lang.perl.misc:
> I have directory, say "c:\documents" on Windows or "/home/petr/
> documents" on Linux. In this directory many files are stored with many
> filetypes (extensions), say *.doc, *.txt, *.zip. I need to find fastes
> way how to check if some filetype exist. Now I use routine where I use
> readdir() and return true if passed filetype is first time found but
> when I have huge number of files but passed filetype is not found then
> routine is very slow before return false.
> Any idea?
Obviously no routine can say no such file exists until, in one way or
another, it has examined all of the files.
Did you try globbing to see if it is any faster:
$found = 0;
if (</usr/home/lars/saves/*.cgi>){
$found = 1;
}
--
Lars Eighner <http://larseighner.com/> usenet@larseighner.com
"Fascism should more properly be called corporatism, since it is the
merger of state and corporate power."-Benito Mussolini * When you write the
check to pay your taxes, remember there are two l's in "Halliburton."
------------------------------
Date: Wed, 06 Aug 2008 11:08:46 +0100
From: RedGrittyBrick <RedGrittyBrick@SpamWeary.foo>
Subject: Re: How to check for filetype existence quickly
Message-Id: <4899782f$0$2510$da0feed9@news.zen.co.uk>
fidokomik wrote:
> I have directory, say "c:\documents" on Windows or "/home/petr/
> documents" on Linux. In this directory many files are stored with many
> filetypes (extensions), say *.doc, *.txt, *.zip.
On Linux, file name extensions are not required and if present, may not
be a reliable guide to file type. `man file`.
For Windows, consider ADT, AFM, ALL etc in
http://en.wikipedia.org/wiki/List_of_file_formats_(alphabetical)
I guess you have control of these files and so the above isn't an issue
in this case.
> I need to find fastes
> way how to check if some filetype exist. Now I use routine where I use
> readdir() and return true if passed filetype is first time found but
> when I have huge number of files but passed filetype is not found then
> routine is very slow before return false.
> Any idea?
Create, maintain and use an index or cache? I'd use a hash, maybe backed
by DBM or suchlike. I'd schedule index updates or use the OS'
directory-change notification mechanism to ensure file additions,
deletions and renames get indexed.
--
RGB
------------------------------
Date: Wed, 6 Aug 2008 08:10:49 +0000 (UTC)
From: Lars Eighner <usenet@larseighner.com>
Subject: How to flush STDIN with getc()?
Message-Id: <slrng9imqi.1pfu.usenet@debranded.larseighner.com>
I'm using perl 5.8.8 on FreeBSD.
I understand that getc() defaults to STDIN when an argument is not
specified, and getc() does not work until ENTER is hit at the keyboard
(i.e. STDIN). However, on the second call to get(), it appears I
get the next character from the same line (which might be the
newline from the ENTER, or might be 'e' if 'yes\n' was typed instead
of 'y\n'.
What's the right way to throw away the junk from the previous line?
--
Lars Eighner <http://larseighner.com/> usenet@larseighner.com
War on Terrorism: Bad News from the Sanity Front
"In this autumn of anger, even a liberal can find his thoughts turning to ...
torture." --Jonathan Alter,_Newsweek_
------------------------------
Date: Wed, 6 Aug 2008 04:42:20 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Wed Aug 6 2008
Message-Id: <K55x2K.MCL@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-Fork-Lazy-0.01
http://search.cpan.org/~osfameron/Acme-Fork-Lazy-0.01/
abstract forking with lazy variables
----
Acme-Fork-Lazy-0.02
http://search.cpan.org/~osfameron/Acme-Fork-Lazy-0.02/
abstract forking with lazy variables
----
Acme-MJD-FR-0.01
http://search.cpan.org/~rgarcia/Acme-MJD-FR-0.01/
the wisdom of Klortho the Magnificent, in French
----
App-ConPalette-0.1.4
http://search.cpan.org/~hinrik/App-ConPalette-0.1.4/
----
App-ZofCMS-Plugin-DBI-0.0101
http://search.cpan.org/~zoffix/App-ZofCMS-Plugin-DBI-0.0101/
DBI access from ZofCMS templates
----
App-ZofCMS-Plugin-DBI-0.0102
http://search.cpan.org/~zoffix/App-ZofCMS-Plugin-DBI-0.0102/
DBI access from ZofCMS templates
----
App-ZofCMS-Plugin-Syntax-Highlight-CSS-0.0101
http://search.cpan.org/~zoffix/App-ZofCMS-Plugin-Syntax-Highlight-CSS-0.0101/
provide syntax highlighted CSS code snippets on your site
----
App-ZofCMS-Plugin-Syntax-Highlight-CSS-0.0102
http://search.cpan.org/~zoffix/App-ZofCMS-Plugin-Syntax-Highlight-CSS-0.0102/
provide syntax highlighted CSS code snippets on your site
----
Atomik-0.00001_01
http://search.cpan.org/~dmaki/Atomik-0.00001_01/
An Atom/AtomPub Framework
----
Catalyst-Plugin-CommandLine-0.05
http://search.cpan.org/~jkutej/Catalyst-Plugin-CommandLine-0.05/
Catalyst plugin to make $c available also for scripts.
----
CatalystX-ListFramework-Builder-0.15
http://search.cpan.org/~oliver/CatalystX-ListFramework-Builder-0.15/
Instant AJAX web front-end for DBIx::Class, using Catalyst
----
Chart-Clicker-1.99_03
http://search.cpan.org/~gphat/Chart-Clicker-1.99_03/
Powerful, extensible charting.
----
ClearPress-237
http://search.cpan.org/~rpettett/ClearPress-237/
Simple, fresh & fruity MVC framework
----
Config-Any-0.13
http://search.cpan.org/~bricas/Config-Any-0.13/
Load configuration from different file formats, transparently
----
File-IgnoreReadonly-0.01
http://search.cpan.org/~adamk/File-IgnoreReadonly-0.01/
Temporarily ensure a file is writable, even if it is readonly
----
Filter-QuasiQuote-0.01
http://search.cpan.org/~agent/Filter-QuasiQuote-0.01/
Quasiquoting for Perl
----
Form-Processor-Model-DBIC-0.04
http://search.cpan.org/~gshank/Form-Processor-Model-DBIC-0.04/
Model class for Form Processor using DBIx::Class
----
Geo-IP-1.34
http://search.cpan.org/~borisz/Geo-IP-1.34/
Look up location and network information by IP Address
----
Geometry-Primitive-0.08
http://search.cpan.org/~gphat/Geometry-Primitive-0.08/
Primitive Geometry Entities
----
Graphics-Primitive-0.11
http://search.cpan.org/~gphat/Graphics-Primitive-0.11/
Device and library agnostic graphic primitives
----
Graphics-Primitive-0.12
http://search.cpan.org/~gphat/Graphics-Primitive-0.12/
Device and library agnostic graphic primitives
----
Graphics-Primitive-Driver-Cairo-0.05
http://search.cpan.org/~gphat/Graphics-Primitive-Driver-Cairo-0.05/
Cairo backend for Graphics::Primitive
----
Graphics-Primitive-Driver-Cairo-0.06
http://search.cpan.org/~gphat/Graphics-Primitive-Driver-Cairo-0.06/
Cairo backend for Graphics::Primitive
----
HTML-TurboForm-0.23
http://search.cpan.org/~camelcase/HTML-TurboForm-0.23/
----
IPC-Messaging-0.01_09
http://search.cpan.org/~gruber/IPC-Messaging-0.01_09/
process handling and message passing, Erlang style
----
Microarray-0.45b
http://search.cpan.org/~cjones/Microarray-0.45b/
A Perl module for creating and manipulating DNA Microarray experiment objects
----
Muldis-Rosetta-0.9.0
http://search.cpan.org/~duncand/Muldis-Rosetta-0.9.0/
Full-featured truly relational DBMS in Perl
----
POE-Component-IRC-Plugin-MegaHAL-0.02
http://search.cpan.org/~hinrik/POE-Component-IRC-Plugin-MegaHAL-0.02/
A PoCo-IRC plugin which wraps an instance of POE::Component::AI::MegaHAL.
----
POE-Component-IRC-Plugin-MegaHAL-0.03
http://search.cpan.org/~hinrik/POE-Component-IRC-Plugin-MegaHAL-0.03/
A PoCo-IRC plugin which wraps an instance of POE::Component::AI::MegaHAL.
----
POE-Component-IRC-Plugin-MegaHAL-0.04
http://search.cpan.org/~hinrik/POE-Component-IRC-Plugin-MegaHAL-0.04/
A PoCo-IRC plugin which wraps an instance of POE::Component::AI::MegaHAL.
----
POE-Component-IRC-Plugin-MegaHAL-0.05
http://search.cpan.org/~hinrik/POE-Component-IRC-Plugin-MegaHAL-0.05/
A PoCo-IRC plugin which wraps an instance of POE::Component::AI::MegaHAL.
----
POOF-1.1
http://search.cpan.org/~bmillares/POOF-1.1/
Perl extension that provides stronger typing, encapsulation and inheritance.
----
PerlIO-code-0.03
http://search.cpan.org/~gfuji/PerlIO-code-0.03/
Calls a subroutine with I/O interface
----
Portable-Dist-0.01
http://search.cpan.org/~adamk/Portable-Dist-0.01/
Modify a Perl distribution to make it portable
----
Portable-Dist-0.02
http://search.cpan.org/~adamk/Portable-Dist-0.02/
Modify a Perl distribution to make it portable
----
SVK-v2.1.99_01
http://search.cpan.org/~clkao/SVK-v2.1.99_01/
A Distributed Version Control System
----
Sjis-0.22
http://search.cpan.org/~ina/Sjis-0.22/
Source code filter for ShiftJIS script
----
SmokeRunner-Multi-0.14
http://search.cpan.org/~drolsky/SmokeRunner-Multi-0.14/
Manage smoke tests across multiple branches/checkouts/projects
----
Spread-Client-0.03_02
http://search.cpan.org/~mbailey/Spread-Client-0.03_02/
Spread client that allows synchronous OR asynchronous multicast/receive/join/leave/disconnect to spread daemons
----
Sub-Nary-0.02
http://search.cpan.org/~vpit/Sub-Nary-0.02/
Try to count how many elements a subroutine can return in list context.
----
Test-Pod-Snippets-0.04.01
http://search.cpan.org/~yanick/Test-Pod-Snippets-0.04.01/
Generate tests from pod code snippets
----
Test-Pod-Snippets-0.05
http://search.cpan.org/~yanick/Test-Pod-Snippets-0.05/
Generate tests from pod code snippets
----
Test-Pod-Snippets-0.06
http://search.cpan.org/~yanick/Test-Pod-Snippets-0.06/
Generate tests from pod code snippets
----
Test-WWW-Selenium-1.15
http://search.cpan.org/~lukec/Test-WWW-Selenium-1.15/
Test applications using Selenium Remote Control
----
WWW-LW2-0.10
http://search.cpan.org/~pearl/WWW-LW2-0.10/
the module for easy and convenient use LW2.
----
WWW-MobileCarrierJP-0.19
http://search.cpan.org/~tokuhirom/WWW-MobileCarrierJP-0.19/
scrape mobile carrier information
----
WWW-Salesforce-0.090
http://search.cpan.org/~capoeirab/WWW-Salesforce-0.090/
v0.090 - this class provides a simple abstraction layer between SOAP::Lite and Salesforce.com.
----
WWW-Yandex-TIC-0.03
http://search.cpan.org/~bashlov/WWW-Yandex-TIC-0.03/
Query Yandex Thematic Index of Citing (TIC) for domain
----
XML-SAX-0.96
http://search.cpan.org/~grantm/XML-SAX-0.96/
Simple API for XML
----
mnm-0.02-1
http://search.cpan.org/~daleamon/mnm-0.02-1/
Merge and Mirror sources and archive/backup repositories
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, 6 Aug 2008 02:54:06 -0700 (PDT)
From: Kenneth Brun Nielsen <kenneth.brun.nielsen@googlemail.com>
Subject: Newbie: Simple conditional on regexp match
Message-Id: <09b948e6-3e15-4617-96c2-611874e7a633@m36g2000hse.googlegroups.com>
I need to perform a conditional on a regexp match. How can I do that
(easily) in PERL.
The following prints out all lines - also the ones, that doesnt match
the regular expression.
#!/usr/bin/perl -w
open FILEHANDLE, "soatest.soa";
while (<FILEHANDLE>){
if (/^\*| XI/) {
print "match in line: $.\n";
}
}
------------------------------
Date: Wed, 6 Aug 2008 02:43:10 +0100
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: PPM - scripting
Message-Id: <e6cnm5-60p.ln1@osiris.mauzo.dyndns.org>
Quoth Slickuser <slick.users@gmail.com>:
> Hey guys,
>
> I would like to a create PPM that compile on Windows.
I'm not sure what you mean by a 'PPM'. Are you referring to
ActiveState's Perl Package Manager packages? If so, then you don't need
to turn your script into a package before you turn it into an
executable: the package would only be useful if you wanted to give it
to someone else with a copy of ActiveState Perl already installed.
> I am planning to
> buy Perl Dev Kit Pro which can turn my Perl script into executable.
I suspect there won't be many people here who know much about Perl Dev
Kit Pro, since it isn't freely available, but the PAR::Packer module on
CPAN provides a pp command that makes it very easy to do just that.
> Before that, I want to make sure if this could be achieve on Perl and
> is there any example out there.
>
> For example, it will look like this:
>
> game.ppm
OK, now I'm really confused. Surely you mean 'game.exe'?
> So I want "game" command to be executable on Windows prompt.
>
> > game start
> > game display -name "Slickuser"
> > game stop
> > game exit
>
> "game" will be overall script
> "display" will be a sub function
> "-name" will be the option follow by arguments
That is certainly possible with pp, and I am sure it's possible with
ActiveState's tool as well. Write a Perl script you can invoke like
perl game start
perl game display -name "Slickuser"
(see @ARGV in perlvar if you need help with that) and then package it up
with your tool of choice.
Ben
--
BEGIN{*(=sub{$,=*)=sub{print@_};local($#,$;,$/)=@_;for(keys%{ #ben@morrow.me.uk
$#}){/m/&&next;**=${$#}{$_};/(\w):/&&(&(($#.$_,$;.$+,$/),next);$/==\$*&&&)($;.$
_)}};*_=sub{for(@_){$|=(!$|||$_||&)(q) )));&((q:\:\::,q,,,\$_);$_&&&)("\n")}}}_
$J::u::s::t, $a::n::o::t::h::e::r, $P::e::r::l, $h::a::c::k::e::r, $,
------------------------------
Date: Tue, 5 Aug 2008 22:53:47 -0700 (PDT)
From: "dev_kr_banga@hotmail.com" <dev.b.85@gmail.com>
Subject: Re: session
Message-Id: <e2604e8c-6bd4-4da6-bf44-dffd9bb55d91@w7g2000hsa.googlegroups.com>
On Jul 7, 7:44 pm, Ron Bergin <r...@i.frys.com> wrote:
> On Jul 7, 1:10 am, "dev_kr_ba...@hotmail.com" <dev.b...@gmail.com>
> wrote:
>
> > i m had made a web page and now i want to set session on it.....
>
> > please can any body tell me how to set seesion on my web page
>
> http://search.cpan.org/~markstos/CGI-Session-4.32/lib/CGI/Session.pmhttp://search.cpan.org/~markstos/CGI-Session-4.32/lib/CGI/Session/Tut...
thanx for the help
------------------------------
Date: Tue, 5 Aug 2008 22:53:57 -0700 (PDT)
From: "dev_kr_banga@hotmail.com" <dev.b.85@gmail.com>
Subject: Re: session
Message-Id: <66e46118-a87f-40c6-b954-de33afec633c@l42g2000hsc.googlegroups.com>
On Jul 7, 9:12 pm, Sherman Pendley <spamt...@dot-app.org> wrote:
> "dev_kr_ba...@hotmail.com" <dev.b...@gmail.com> writes:
> > i had made a web page and now i want to set session on it.....
>
> > please can any body tell me how to set seesion on my web page
>
> Options abound, and depend a great deal on what framework (if any) you
> are using. A "behind the scenes" description of HTTP "sessions" can be
> found here:
>
> <http://jan.newmarch.name/ecommerce/session.html>
>
> If you're writing a simple standalone CGI, you might have a look at
> the CGI::Session module:
>
> <http://search.cpan.org/~markstos/CGI-Session-4.32/lib/CGI/Session.pm>
>
> But, if you're using an application framework such as Catalyst,
> session support is usually already included in the framework:
>
> <http://search.cpan.org/~nuffin/Catalyst-Plugin-Session-0.19/lib/Catal...>
>
> sherm--
>
> --
> My blog:http://shermspace.blogspot.com
> Cocoa programming in Perl:http://camelbones.sourceforge.net
thanx for the help
------------------------------
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 1772
***************************************