[31077] in Perl-Users-Digest
Perl-Users Digest, Issue: 2322 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Apr 6 11:09:45 2009
Date: Mon, 6 Apr 2009 08:09:08 -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 Mon, 6 Apr 2009 Volume: 11 Number: 2322
Today's topics:
Re: Ambiguity with lc <devnull4711@web.de>
Re: Ambiguity with lc <devnull4711@web.de>
Re: Ambiguity with lc <devnull4711@web.de>
Re: Ambiguity with lc <ben@morrow.me.uk>
Re: Ambiguity with lc <devnull4711@web.de>
Re: Ambiguity with lc <1usa@llenroc.ude.invalid>
Re: Ambiguity with lc <devnull4711@web.de>
Re: database advice <cwilbur@chromatico.net>
Re: database advice <klaus03@gmail.com>
Re: Hidden mode Apr. 4, 2009 <edgrsprj@ix.netcom.com>
Re: Hidden mode Apr. 4, 2009 <jurgenex@hotmail.com>
Re: Hidden mode Apr. 4, 2009 <edgrsprj@ix.netcom.com>
new CPAN modules on Mon Apr 6 2009 (Randal Schwartz)
Re: resolve single line with multiple items into mutlip <cartercc@gmail.com>
Re: XRC vs Perl (GUI) generated code <cartercc@gmail.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 06 Apr 2009 09:17:22 +0200
From: Frank Seitz <devnull4711@web.de>
Subject: Re: Ambiguity with lc
Message-Id: <73tok2Fu2kl7U1@mid.individual.net>
Ben Morrow wrote:
> Quoth Frank Seitz <devnull4711@web.de>:
>> #!/usr/bin/perl
>>
>> use strict;
>> use warnings;
>>
>> my @arr = map {lc.'X'} qw/A B C/;
>> print "@arr\n";
>>
>> __END__
>> Warning: Use of "lc" without parentheses is ambiguous at ./test.pl line 6.
>> aX bX cX
>>
>> I don't see the problem. Where is the ambiguity?
>
> The sort of thing being warned about is
>
> rand + 5
>
> which means
>
> rand(+5)
>
> rather than
>
> rand() + 5
This is the explanation in perldiag, I know. But I don't understand
what this has to do with my code.
> In your case the warning is firing accidentally.
Accidentally? Does this mean it is a bug or deficiency of the Parser?
Frank
--
Dipl.-Inform. Frank Seitz; http://www.fseitz.de/
Anwendungen für Ihr Internet und Intranet
Tel: 04103/180301; Fax: -02; Industriestr. 31, 22880 Wedel
------------------------------
Date: Mon, 06 Apr 2009 09:19:18 +0200
From: Frank Seitz <devnull4711@web.de>
Subject: Re: Ambiguity with lc
Message-Id: <73tonmFu2kl7U2@mid.individual.net>
Glenn Jackman wrote:
> At 2009-04-04 10:17AM, "Frank Seitz" wrote:
>> I don't believe that anybody means lc($_.'X') when she writes lc.'X'.
>> I expect lc($_).'X' and nothing else.
>
> I don't believe anyone trying to write a maintainable program would
> write "lc.'x'"
lc lowercases $_ and . concatenates the result with 'X'.
In my opinion this is clean code.
Frank
--
Dipl.-Inform. Frank Seitz; http://www.fseitz.de/
Anwendungen für Ihr Internet und Intranet
Tel: 04103/180301; Fax: -02; Industriestr. 31, 22880 Wedel
------------------------------
Date: Mon, 06 Apr 2009 09:21:30 +0200
From: Frank Seitz <devnull4711@web.de>
Subject: Re: Ambiguity with lc
Message-Id: <73torqFu2kl7U3@mid.individual.net>
sln@netherlands.com wrote:
>
> Everybody knows lc.'X' is ambigous.
I wouldn't have asked if I had known what the problem is.
> Thats why everybody always uses spaces
> that don't turn warnings off. The compiler gets abmigous if you don't.
I don't know what you want to tell me.
Frank
--
Dipl.-Inform. Frank Seitz; http://www.fseitz.de/
Anwendungen für Ihr Internet und Intranet
Tel: 04103/180301; Fax: -02; Industriestr. 31, 22880 Wedel
------------------------------
Date: Mon, 6 Apr 2009 11:36:03 +0100
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: Ambiguity with lc
Message-Id: <jh2pa6-lms.ln1@osiris.mauzo.dyndns.org>
Quoth Frank Seitz <devnull4711@web.de>:
> Ben Morrow wrote:
> > Quoth Frank Seitz <devnull4711@web.de>:
> >> #!/usr/bin/perl
> >>
> >> use strict;
> >> use warnings;
> >>
> >> my @arr = map {lc.'X'} qw/A B C/;
> >> print "@arr\n";
> >>
> >> __END__
> >> Warning: Use of "lc" without parentheses is ambiguous at ./test.pl line 6.
> >> aX bX cX
> >>
> >> I don't see the problem. Where is the ambiguity?
> >
> > The sort of thing being warned about is
> >
> > rand + 5
> >
> > which means
> >
> > rand(+5)
> >
> > rather than
> >
> > rand() + 5
>
> This is the explanation in perldiag, I know. But I don't understand
> what this has to do with my code.
Neither could I when I wrote that, and I thought the warning was firing
in error. However, it *is* actually ambiguous. Consider
lc.5
This parses as
lc(.5)
rather than
lc() . 5
since the '.' can be interpreted as the start of a number.
Ben
------------------------------
Date: Mon, 06 Apr 2009 14:07:07 +0200
From: Frank Seitz <devnull4711@web.de>
Subject: Re: Ambiguity with lc
Message-Id: <73u9jbFu2kl7U4@mid.individual.net>
Ben Morrow wrote:
> Quoth Frank Seitz <devnull4711@web.de>:
>>
>> This is the explanation in perldiag, I know. But I don't understand
>> what this has to do with my code.
>
> Neither could I when I wrote that, and I thought the warning was firing
> in error. However, it *is* actually ambiguous. Consider
>
> lc.5
>
> This parses as
>
> lc(.5)
>
> rather than
>
> lc() . 5
>
> since the '.' can be interpreted as the start of a number.
Okay, but in my case there is no digit following the dot,
the dot is evidently the binary concatenation operator.
Frank
--
Dipl.-Inform. Frank Seitz; http://www.fseitz.de/
Anwendungen für Ihr Internet und Intranet
Tel: 04103/180301; Fax: -02; Industriestr. 31, 22880 Wedel
------------------------------
Date: Mon, 06 Apr 2009 13:11:53 GMT
From: "A. Sinan Unur" <1usa@llenroc.ude.invalid>
Subject: Re: Ambiguity with lc
Message-Id: <Xns9BE55D8FDA41Aasu1cornelledu@127.0.0.1>
Frank Seitz <devnull4711@web.de> wrote in
news:73tonmFu2kl7U2@mid.individual.net:
> Glenn Jackman wrote:
>> At 2009-04-04 10:17AM, "Frank Seitz" wrote:
>>> I don't believe that anybody means lc($_.'X') when she writes
>>> lc.'X'. I expect lc($_).'X' and nothing else.
>>
>> I don't believe anyone trying to write a maintainable program would
>> write "lc.'x'"
>
> lc lowercases $_ and . concatenates the result with 'X'.
> In my opinion this is clean code.
On the other hand, mere mortals may miss the . or may have to check
documentation.
Will $x and $y in the code below contain the same string? I cannot
instaneously answer that question. I have to think about it. That is
what makes this code a maintanence problem:
#!/usr/bin/perl
use strict;
use warnings;
my $v = 'A';
$_ = $v;
my $x = lc . 'X';
my $y = lc $v . 'X';
print "'$_'\n" for $x, $y;
__END__
--
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: Mon, 06 Apr 2009 15:44:04 +0200
From: Frank Seitz <devnull4711@web.de>
Subject: Re: Ambiguity with lc
Message-Id: <73uf94Fu2kl7U5@mid.individual.net>
A. Sinan Unur wrote:
> Frank Seitz <devnull4711@web.de> wrote in
> news:73tonmFu2kl7U2@mid.individual.net:
>
>> Glenn Jackman wrote:
>>> At 2009-04-04 10:17AM, "Frank Seitz" wrote:
>>>> I don't believe that anybody means lc($_.'X') when she writes
>>>> lc.'X'. I expect lc($_).'X' and nothing else.
>>> I don't believe anyone trying to write a maintainable program would
>>> write "lc.'x'"
>> lc lowercases $_ and . concatenates the result with 'X'.
>> In my opinion this is clean code.
>
> On the other hand, mere mortals may miss the . or may have to check
> documentation.
>
> Will $x and $y in the code below contain the same string? I cannot
> instaneously answer that question. I have to think about it. That is
> what makes this code a maintanence problem:
>
> #!/usr/bin/perl
>
> use strict;
> use warnings;
>
> my $v = 'A';
>
> $_ = $v;
>
> my $x = lc . 'X';
> my $y = lc $v . 'X';
>
> print "'$_'\n" for $x, $y;
For the latter case I agree. In such a case I would always set
parenthesis. The first case is not problematic for me (as Perl adept).
Frank
--
Dipl.-Inform. Frank Seitz; http://www.fseitz.de/
Anwendungen für Ihr Internet und Intranet
Tel: 04103/180301; Fax: -02; Industriestr. 31, 22880 Wedel
------------------------------
Date: Sun, 05 Apr 2009 23:04:17 -0400
From: Charlton Wilbur <cwilbur@chromatico.net>
Subject: Re: database advice
Message-Id: <86ab6uo53i.fsf@mithril.chromatico.net>
>>>>> "cc" == ccc31807 <cartercc@gmail.com> writes:
cc> In this case, IMO, 'doing it right' means doing it simply and
cc> cheaply rather than following the rules.
cc> Thoughts? Thanks for your input. CC
We've had this discussion before. Once again, you're choosing to do it
using the quick and dirty method -- and in this case, doing it right
isn't even that much more effort -- and I'd bet money that once again,
in six months or a year, you will be in here whining about how your
managers don't understand why your code base is so crappy and hard to
maintain.
Do it right. The amount of time doing it right will add to this project
is measurable in *hours*.
Charlton
--
Charlton Wilbur
cwilbur@chromatico.net
------------------------------
Date: Mon, 6 Apr 2009 05:11:06 -0700 (PDT)
From: Klaus <klaus03@gmail.com>
Subject: Re: database advice
Message-Id: <b532f63c-dc5e-4015-960b-5dc8171a52cf@21g2000vbk.googlegroups.com>
On Apr 2, 11:41=A0pm, Ben Morrow <b...@morrow.me.uk> wrote:
> Quoth Klaus <klau...@gmail.com>:
> > Anyway, with Perl 5.10 you could, for example, do the following:
>
> > use strict;
> > use warnings;
> > use 5.010;
> > ...
> > my $search =3D <>;
>
> > $sth =3D $dbh->prepare("SELECT diagnosis FROM account");
> > $sth->execute();
>
> > while (my ($diag) =3D $sth->fetchrow_array) {
> > =A0 =A0 if ($search ~~ [split /\|/, $diag]) {
>
> I would be a little wary of using smartmatch (~~) until 5.10.1 is out.
> p5p have decided some of the match semantics were wrong, so they're
> changing in an incompatible way.
Ok, until 5.10.1 is out, the "if ($search ~~ [split /\|/, $diag])"
would then be
if (grep {$search eq $_} split /\|/, $diag) {
However, I keep the say command, even under 5.10.0
--
Klaus
------------------------------
Date: Sun, 5 Apr 2009 22:59:48 -0500
From: "E.D.G." <edgrsprj@ix.netcom.com>
Subject: Re: Hidden mode Apr. 4, 2009
Message-Id: <bvGdnf0ZTbSv40TUnZ2dnUVZ_sednZ2d@earthlink.com>
<sln@netherlands.com> wrote in message
news:n6eit4hpvglj1u7rhsm3uj8a8f59segqfc@4ax.com...
> On Sat, 4 Apr 2009 06:12:47 -0500, "E.D.G." <edgrsprj@ix.netcom.com>
> wrote:
>
> Can a Perl script be compiled as a exe service? Sure, why not?
I was wondering if there might be some way to start a Perl program so that
it would run in the background and not generate a Run Icon that appears on
the Windows screen. For example, is there a run command modifier like this?
Run program.pl -hide
One application for this is a utility program I am developing that would act
as a central hub type program that would watch for keyboard key presses and
send that information to other language computer programs, enable them to
easily communicate with one another and share access to a graphics display
program. Only that hub program would maintain an active "pipe" to the
graphics program. And it would be nice if it could run invisibly in the
background.
I have program from years ago that will start a Perl program running like
that. But I thought there might be a way to do that directly. There is
also a freeware program that can be used to manipulate Run Icons etc. But
again, that involves additional software.
------------------------------
Date: Sun, 05 Apr 2009 21:44:42 -0700
From: Jürgen Exner <jurgenex@hotmail.com>
Subject: Re: Hidden mode Apr. 4, 2009
Message-Id: <jv1jt45g32a2n2qrqe1921k3imuvogt8ed@4ax.com>
"E.D.G." <edgrsprj@ix.netcom.com> wrote:
>I was wondering if there might be some way to start a Perl program so that
>it would run in the background and not generate a Run Icon that appears on
>the Windows screen.
This topic comes up every now and then.
It seems like you are looking for wperl.exe. wperl.exe comes is part of
ActiveState Perl and behaves like perl.exe, except that the Perl process
runs hidden in the background.
jue
------------------------------
Date: Mon, 6 Apr 2009 00:35:16 -0500
From: "E.D.G." <edgrsprj@ix.netcom.com>
Subject: Re: Hidden mode Apr. 4, 2009
Message-Id: <r82dneRclN0FCUTUnZ2dnUVZ_sWdnZ2d@earthlink.com>
"Jürgen Exner" <jurgenex@hotmail.com> wrote in message
news:jv1jt45g32a2n2qrqe1921k3imuvogt8ed@4ax.com...
> "E.D.G." <edgrsprj@ix.netcom.com> wrote:
> It seems like you are looking for wperl.exe. wperl.exe comes is part of
That program works and does what is needed.
I thought that there was probably some type of option for doing that.
However, locating specific types of information like that in the
documentation is something I have found to be difficult in the past.
------------------------------
Date: Mon, 6 Apr 2009 04:42:26 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Mon Apr 6 2009
Message-Id: <KHnx2q.u2q@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.
App-CSV-0.04
http://search.cpan.org/~gaal/App-CSV-0.04/
process CSV files
----
App-Hachero-0.06_01
http://search.cpan.org/~danjou/App-Hachero-0.06_01/
a plaggable log analyzing framework
----
App-Hachero-0.06_02
http://search.cpan.org/~danjou/App-Hachero-0.06_02/
a plaggable log analyzing framework
----
App-PM-Announce-0.02
http://search.cpan.org/~rkrimen/App-PM-Announce-0.02/
----
Business-KontoCheck-2.98
http://search.cpan.org/~michel/Business-KontoCheck-2.98/
Perl extension for checking German and Austrian Bank Account Numbers
----
CGI-Lazy-1.03
http://search.cpan.org/~vayde/CGI-Lazy-1.03/
----
CPANPLUS-Dist-Arch-0.06
http://search.cpan.org/~juster/CPANPLUS-Dist-Arch-0.06/
CPANPLUS backend for building Archlinux pacman packages
----
Chart-Clicker-2.22
http://search.cpan.org/~gphat/Chart-Clicker-2.22/
Powerful, extensible charting.
----
Chess-PGN-EPD-0.23
http://search.cpan.org/~hsmyers/Chess-PGN-EPD-0.23/
Perl extension to produce and manipulate EPD text.
----
Chess-PGN-EPD-0.24
http://search.cpan.org/~hsmyers/Chess-PGN-EPD-0.24/
Perl extension to produce and manipulate EPD text.
----
Class-DBI-Lite-0.022
http://search.cpan.org/~johnd/Class-DBI-Lite-0.022/
Lightweight ORM for Perl
----
Class-MOP-0.80_01
http://search.cpan.org/~drolsky/Class-MOP-0.80_01/
A Meta Object Protocol for Perl 5
----
Config-Perl-V-0.03
http://search.cpan.org/~hmbrand/Config-Perl-V-0.03/
Structured data retreival of perl -V output
----
DBD-SQLite-1.19_10
http://search.cpan.org/~adamk/DBD-SQLite-1.19_10/
Self Contained RDBMS in a DBI Driver
----
DBIx-Class-Snowflake-.10
http://search.cpan.org/~mfollett/DBIx-Class-Snowflake-.10/
----
DateTime-Format-HTTP-0.38
http://search.cpan.org/~drolsky/DateTime-Format-HTTP-0.38/
Date conversion routines
----
DateTime-TimeZone-0.87
http://search.cpan.org/~drolsky/DateTime-TimeZone-0.87/
Time zone object base class and factory
----
Dist-Zilla-Plugin-PerlTidy-0.04
http://search.cpan.org/~fayland/Dist-Zilla-Plugin-PerlTidy-0.04/
PerlTidy in Dist::Zilla
----
Dist-Zilla-Plugin-Perltidy-0.03
http://search.cpan.org/~fayland/Dist-Zilla-Plugin-Perltidy-0.03/
----
Encoding-FixLatin-1.00
http://search.cpan.org/~grantm/Encoding-FixLatin-1.00/
takes mixed encoding input and produces UTF-8 output
----
Fey-0.26
http://search.cpan.org/~drolsky/Fey-0.26/
Better SQL Generation Through Perl
----
FileSystem-LL-FAT-0.04
http://search.cpan.org/~ilyaz/FileSystem-LL-FAT-0.04/
Perl extension for low-level access to FAT partitions
----
GNTP-Growl-0.01
http://search.cpan.org/~mattn/GNTP-Growl-0.01/
Perl implementation of GNTP Protocol (Client Part)
----
Graphics-Primitive-Driver-Cairo-0.34
http://search.cpan.org/~gphat/Graphics-Primitive-Driver-Cairo-0.34/
Cairo backend for Graphics::Primitive
----
Graphics-Primitive-Driver-CairoPango-0.56
http://search.cpan.org/~gphat/Graphics-Primitive-Driver-CairoPango-0.56/
Cairo/Pango backend for Graphics::Primitive
----
HOP-Parser-0.02
http://search.cpan.org/~ovid/HOP-Parser-0.02/
"Higher Order Perl" Parser
----
HOP-Parser-0.02_01
http://search.cpan.org/~ovid/HOP-Parser-0.02_01/
"Higher Order Perl" Parser
----
HOP-Stream-0.03
http://search.cpan.org/~ovid/HOP-Stream-0.03/
"Higher Order Perl" streams
----
HTML-Accessors-0.1.56
http://search.cpan.org/~pjfl/HTML-Accessors-0.1.56/
Generate HTML elements
----
IO-Stream-MatrixSSL-1.1.0
http://search.cpan.org/~powerman/IO-Stream-MatrixSSL-1.1.0/
Crypt::MatrixSSL plugin for IO::Stream
----
Judy-0.13
http://search.cpan.org/~jjore/Judy-0.13/
Library for creating and accessing dynamic arrays
----
Language-Befunge-4.10
http://search.cpan.org/~jquelin/Language-Befunge-4.10/
a generic funge interpreter
----
Math-MPC-0.60
http://search.cpan.org/~sisyphus/Math-MPC-0.60/
perl interface to the MPC (multi precision complex) library.
----
Moose-0.73_01
http://search.cpan.org/~drolsky/Moose-0.73_01/
A postmodern object system for Perl 5
----
MooseX-AttributeHelpers-0.16
http://search.cpan.org/~sartak/MooseX-AttributeHelpers-0.16/
Extend your attribute interfaces
----
MooseX-Constructor-AllErrors-0.006
http://search.cpan.org/~hdp/MooseX-Constructor-AllErrors-0.006/
capture all constructor errors
----
MooseX-Plaggerize-0.05
http://search.cpan.org/~tokuhirom/MooseX-Plaggerize-0.05/
plagger like plugin feature for Moose
----
MySQL-Admin-0.41
http://search.cpan.org/~lze/MySQL-Admin-0.41/
Mysql Administrator.
----
Net-Google-Spreadsheets-0.03
http://search.cpan.org/~danjou/Net-Google-Spreadsheets-0.03/
A Perl module for using Google Spreadsheets API.
----
Net-ParSCP-0.06
http://search.cpan.org/~casiano/Net-ParSCP-0.06/
Parallel secure copy
----
NetHack-Item-0.09
http://search.cpan.org/~sartak/NetHack-Item-0.09/
parse and interact with a NetHack item
----
PAR-0.992
http://search.cpan.org/~smueller/PAR-0.992/
Perl Archive Toolkit
----
POE-Component-Omegle-0.01
http://search.cpan.org/~revmischa/POE-Component-Omegle-0.01/
Simple POE wrapper around WWW::Omegle
----
POE-Component-Omegle-0.02
http://search.cpan.org/~revmischa/POE-Component-Omegle-0.02/
Simple POE wrapper around WWW::Omegle
----
Padre-Plugin-Autoformat-1.1.2
http://search.cpan.org/~jquelin/Padre-Plugin-Autoformat-1.1.2/
reformat your text within Padre
----
Padre-Plugin-Nopaste-0.2.1
http://search.cpan.org/~jquelin/Padre-Plugin-Nopaste-0.2.1/
send code on a nopaste website from padre
----
Padre-Plugin-SpellCheck-0.02
http://search.cpan.org/~jquelin/Padre-Plugin-SpellCheck-0.02/
check spelling in Padre
----
Padre-Plugin-SpellCheck-0.03
http://search.cpan.org/~jquelin/Padre-Plugin-SpellCheck-0.03/
check spelling in Padre
----
Perldoc-Server-0.05
http://search.cpan.org/~jonallen/Perldoc-Server-0.05/
Local Perl documentation server
----
Rose-DBx-Object-Renderer-0.45
http://search.cpan.org/~danny/Rose-DBx-Object-Renderer-0.45/
Web UI Rendering for Rose::DB::Object
----
SVG-Sparkline-0.2.0
http://search.cpan.org/~gwadej/SVG-Sparkline-0.2.0/
Create Sparklines in SVG
----
Shipwright-2.1.6
http://search.cpan.org/~sunnavy/Shipwright-2.1.6/
Best Practical Builder
----
Sys-Info-0.70
http://search.cpan.org/~burak/Sys-Info-0.70/
Fetch information from the host system
----
Sys-Info-Base-0.70
http://search.cpan.org/~burak/Sys-Info-Base-0.70/
Base class for Sys::Info
----
Sys-Info-Driver-BSD-0.70
http://search.cpan.org/~burak/Sys-Info-Driver-BSD-0.70/
BSD driver for Sys::Info
----
Sys-Info-Driver-Linux-0.70
http://search.cpan.org/~burak/Sys-Info-Driver-Linux-0.70/
Linux driver for Sys::Info
----
Sys-Info-Driver-Unknown-0.70
http://search.cpan.org/~burak/Sys-Info-Driver-Unknown-0.70/
Compatibility layer for Sys::Info
----
Sys-Info-Driver-Windows-0.70
http://search.cpan.org/~burak/Sys-Info-Driver-Windows-0.70/
Windows driver for Sys::Info
----
Test-Database-0.99_02
http://search.cpan.org/~book/Test-Database-0.99_02/
Database handles ready for testing
----
URI-GoogleChart-0.04
http://search.cpan.org/~gaas/URI-GoogleChart-0.04/
Generate Google Chart URIs
----
URI-Template-Restrict-0.03
http://search.cpan.org/~masaki/URI-Template-Restrict-0.03/
restricted URI Templates handler
----
URI-cpan-1.003
http://search.cpan.org/~rjbs/URI-cpan-1.003/
URLs that refer to things on the CPAN
----
Verilog-Perl-3.121
http://search.cpan.org/~wsnyder/Verilog-Perl-3.121/
----
WWW-Omegle-0.02
http://search.cpan.org/~revmischa/WWW-Omegle-0.02/
Perl interface www.omegle.com
----
WWW-Scripter-0.001
http://search.cpan.org/~sprout/WWW-Scripter-0.001/
For scripting web sites that have scripts
----
WWW-Scripter-Plugin-Ajax-0.01
http://search.cpan.org/~sprout/WWW-Scripter-Plugin-Ajax-0.01/
WWW::Scripter plugin that provides the XMLHttpRequest object
----
WWW-Scripter-Plugin-JavaScript-0.001
http://search.cpan.org/~sprout/WWW-Scripter-Plugin-JavaScript-0.001/
JavaScript plugin for WWW::Scripter
----
WebService-Telnic-0.2
http://search.cpan.org/~pmakholm/WebService-Telnic-0.2/
Interface to Telnic's SOAP API's
----
Win32-SysPrivilege-v1.2
http://search.cpan.org/~rootkwok/Win32-SysPrivilege-v1.2/
Perl extension for Running external programs with SYSTEM Privilege
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: Mon, 6 Apr 2009 07:20:13 -0700 (PDT)
From: ccc31807 <cartercc@gmail.com>
Subject: Re: resolve single line with multiple items into mutliple lines, single items
Message-Id: <4363c72b-4e88-4874-bd43-0d6c2d8de735@z1g2000yqn.googlegroups.com>
Some will say this is a simple minded solution, and maybe it is, but
FWIW here's my contribution. This decomposes your data into a data
structure in memory. It's dynamic in the sense that it doesn't matter
how many records you have or where the @'s are, as long as you have
only two levels. All you have to do then is print it out. I have used
Dumper simply because I'm to lazy to finish it.
CODE:
use strict;
use warnings;
use Data::Dumper;
while (<DATA>)
{
my @rest = split /\t/;
my $num = @rest;
for (my $i = 0; $i < $num; $i++)
{
if ($rest[$i] =~ /@/)
{
$rest[$i] = [split /@/, $rest[$i]];
}
print qq(\t$rest[$i]\n);
}
print "\nData Structure via Dumper is:\n";
print Dumper(@rest);
}
exit(0);
__DATA__
A B1@B2 C d e f N1@N2@N3
OUTPUT:
C:\PerlLearn>perl multiple.plx
A
ARRAY(0x235348)
C
d
e
f
ARRAY(0x182471c)
Data Structure via Dumper is:
$VAR1 = 'A';
$VAR2 = [
'B1',
'B2'
];
$VAR3 = 'C';
$VAR4 = 'd';
$VAR5 = 'e';
$VAR6 = 'f';
$VAR7 = [
'N1',
'N2',
'N3
'
];
C:\PerlLearn>
------------------------------
Date: Mon, 6 Apr 2009 06:01:56 -0700 (PDT)
From: ccc31807 <cartercc@gmail.com>
Subject: Re: XRC vs Perl (GUI) generated code
Message-Id: <54c46935-ff1c-45bb-84bb-2ec6648d696e@g19g2000yql.googlegroups.com>
On Apr 5, 5:11=A0pm, "Peter J. Holzer" <hjp-usen...@hjp.at> wrote:
> > We disagree.
>
> Is this the royal we?
No. ;-)
Maybe I should have said that 'I' disagree with you, that 'we'
disagree among ourselves.
I coming off of two big projects, a rare case for me. One's almost
finished and the other is just over half finished. One is a data
intensive project while the other is an interface intensive project
with lots and lots of little pieces of data floating around. My
reaction is that now I wish I had used Java for the second project,
which is much closer to a traditional stand alone app that a web app.
Maybe my personal feeling about these two projects is influencing what
I have said previously in this thread. I use Perl for the majority of
my work, but there are some things (in my work) that Perl isn't suited
for.
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 2322
***************************************
