[30079] in Perl-Users-Digest
Perl-Users Digest, Issue: 1322 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Mar 1 09:09:55 2008
Date: Sat, 1 Mar 2008 06:09:15 -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 Sat, 1 Mar 2008 Volume: 11 Number: 1322
Today's topics:
Re: Converting "’" to an Apostrophe? <maria@maria_de_napoli.com>
Re: Converting "’" to an Apostrophe? <maria@maria_de_napoli.com>
Re: Converting "’" to an Apostrophe? <hjp-usenet2@hjp.at>
Re: Converting "’" to an Apostrophe? <noreply@gunnar.cc>
Re: Converting "’" to an Apostrophe? <hjp-usenet2@hjp.at>
Re: Finding number of file from gzip'ed format xhoster@gmail.com
Re: How to set a HARD memory limit for apache <a@b.c>
Re: Magic $a $b <szrRE@szromanMO.comVE>
new CPAN modules on Sat Mar 1 2008 (Randal Schwartz)
Re: Newbie needs help with IO::Socket (maybe IO::Select <alt_test.3.boerni@spamgourmet.com>
Re: Recommendation for a SNMP module to collect asset d <m@rtij.nl.invlalid>
Re: regex for chars 192 to 255 <tadmc@seesig.invalid>
Re: regex for chars 192 to 255 <john1949@yahoo.com>
Re: regex for chars 192 to 255 <jurgenex@hotmail.com>
Re: regex for chars 192 to 255 <hjp-usenet2@hjp.at>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 29 Feb 2008 18:26:07 -0500
From: maria <maria@maria_de_napoli.com>
Subject: Re: Converting "’" to an Apostrophe?
Message-Id: <c05hs3hsip4pe1qotuu8pu43pi3u1nlab1@4ax.com>
On Fri, 29 Feb 2008 04:29:00 +0100, Gunnar Hjalmarsson
<noreply@gunnar.cc> wrote:
>Petr Vileta wrote:
>> Tad J McClellan wrote:
>>> The s///s modifier makes dot in your pattern match a newline.
>>>
>>> It is a no-op when your pattern does not have a dot in it.
>>
>> I have seen it many times but my book say some bit different.
>>
>> <cite>
>> Larry Wall, Tom Christiansen & Randal L. Schwartz
>> Programming in Perl (Czech translation, 1997)
>>
>> Chapter 2: Basic program parts, page 74
>>
>> Modifiers:
>> ....
>> s Work with string as with single line.
>> </cite>
>>
>> Nowhere any word about dot in regexp.
>
>That's because the book explains it just as ambigous as "perldoc perlop"
>does.
>
>AFAIK, there is one place in the perldoc, and one place only, where the
>/s modifier (and the /m modifier) are properly explained: "perldoc perlre":
>
> s Treat string as single line. That is, change "." to match any
> character whatsoever, even a newline, which normally it would
> not match.
>
>> I wrote many s/// for strings
>> containing \n and where wasn't be any dots in pattern and on some server
>> this work without /s modifier but on other not.
>
>Really? Please show us an example!
Thank you, gunnar, RedGrittyBrick, Petr and A. Sinun Unur.
I appreciate your help.
I have changed my approch. I am using Magpie and
$rss = fetch_rss($url);
instead. It works fine.
maria
------------------------------
Date: Fri, 29 Feb 2008 21:53:22 -0500
From: maria <maria@maria_de_napoli.com>
Subject: Re: Converting "’" to an Apostrophe?
Message-Id: <l4hhs3hitp6jpf956h0knv0jb9mv1ierbe@4ax.com>
On Fri, 29 Feb 2008 10:50:10 +0000, RedGrittyBrick
<RedGrittyBrick@SpamWeary.foo> wrote:
>Petr Vileta wrote:
>> maria wrote:
>>> I am using a CGI program to read XML files and extract their various
>>> items. Somehow, my program converts the apostrophe "’" to ...
>>> "\â\?\T". How do I program my CGI program to convert "’" to
>>> an apostrophe, "'"? Is there a little CGI code that will convert
>>> all these different strings (including dagger, ellipsis,
>>> euro symbol, double quote, etc.) to their ASCII equivalents?
>>> Thank you very much.
>>>
>> You can use s/// for this.
>>
>> my $xml = 'some maria’s text';
>> $xml =~ s/’/'/sg;
>> print $xml;
>>
>
>I know you're answering the question as asked, but I think there's more
>to the problem than that.
>
>Maria's problem is expressed a bit vaguely but let's assume that her XML
>file does indeed contain the eight ASCII-character sequence ’
>Something in her Perl program is clearly converting this to a single
>character \u2019 using UTF-8 encoding. She is then causing this to be
>misrepresented to the browser as Windows Latin-1.
>
>Presumably the translation of the numeric entity reference to a Unicode
>character is done by an XML module Maria is using to read the file. If
>so, you'd have to stop that conversion happening or amend your
>substitution statement accordingly.
>
>Also I'm not sure what "ASCII equivalent" you'd propose for Maria's
>dagger, ellipsis and Euro symbols :-)
>
>s/†/+/sg; ?
>s/…/.../sg; ?
>s/€/EUR/sg; ?
>
>Suppose her XML might contain asterism, per-mille and other punctuation?
>The list of substitutions would get rather cumbersome. Maria might
>struggle to think up or locate ASCII equivalents for some of these. The
>results may be rather ugly and confusing to readers.
>
>Why bother when XML, Perl, HTML, HTTP and web-browsers can all handle
>UTF-8 characters properly?
>
>Personally I'd not make ASCII substitutions, IE7 and FireFox2 can render
>Unicode general punctuation symbols, whether encoded as numeric entities
>or as UTF-8 characters. I guess the same is true of most mainstream
>browsers.
I also forgot to tell you that the MagPie program actually has a
PHP-command, "define('MAGPIE_OUTPUT_ENCODING', 'UTF-8');" that will
resolve several of the common problems involving the conversion of
special characters, etc.
Thanks!
maria
------------------------------
Date: Sat, 1 Mar 2008 11:15:14 +0100
From: "Peter J. Holzer" <hjp-usenet2@hjp.at>
Subject: Re: Converting "’" to an Apostrophe?
Message-Id: <slrnfsib5i.ohg.hjp-usenet2@hrunkner.hjp.at>
On 2008-02-29 03:41, Gunnar Hjalmarsson <noreply@gunnar.cc> wrote:
> A. Sinan Unur wrote:
>> In the mean time, here in 2008, in the docs shipped with Perl 5.10
>>
>> perldoc perlop
>>
>> s Treat string as single line. (Make . match a newline)
>
> Great, that's a clarification I wasn't aware of.
You never read perldoc perlre? It has always explained the exact meaning
of the s and m modifiers (at least since 1995 or so - I haven't used
perl before that).
> Hopefully, in the future (Perl 5.12?), "perldoc perlop" will contain a
> useful explanation of the /m operator as well. Or at least a reference
> to "perldoc perlre".
The latter is there since at least perl 5.6.0 (in the paragraph before
the options). In perl 5.10, it's now a paragraph of its own (instead of
just one sentence in a paragraph) at the end of the qr/STRING/msixpo
section.
hp
------------------------------
Date: Sat, 01 Mar 2008 13:25:02 +0100
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: Converting "’" to an Apostrophe?
Message-Id: <62t0d8F24q0kvU1@mid.individual.net>
Peter J. Holzer wrote:
> On 2008-02-29 03:41, Gunnar Hjalmarsson <noreply@gunnar.cc> wrote:
>> A. Sinan Unur wrote:
>>> In the mean time, here in 2008, in the docs shipped with Perl 5.10
>>>
>>> perldoc perlop
>>>
>>> s Treat string as single line. (Make . match a newline)
>>
>> Great, that's a clarification I wasn't aware of.
>
> You never read perldoc perlre?
I thought it was pretty clear, both from the message to which you
replied and from my other message in this thread, that I do.
>> Hopefully, in the future (Perl 5.12?), "perldoc perlop" will contain a
>> useful explanation of the /m operator as well. Or at least a reference
>> to "perldoc perlre".
>
> The latter is there since at least perl 5.6.0 (in the paragraph before
> the options).
That reference is placed in another context. If I didn't already know
it, I wouldn't understand from perlop that the /m modifier is further
explained in perlre.
> In perl 5.10, it's now a paragraph of its own (instead of
> just one sentence in a paragraph) at the end of the qr/STRING/msixpo
> section.
Do you mean "See perlre ... for a detailed look at the semantics of
regular expressions"? Well, not specific enough, at least not IMO.
There is a lot of misconception about both the /m and /s modifiers, not
least apparent from many questions in this newsgroup. That indicates
that the docs (as a whole) did not explain their meanings clearly
enough. I believe this is still true as regards the /m modifier.
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: Sat, 1 Mar 2008 14:34:35 +0100
From: "Peter J. Holzer" <hjp-usenet2@hjp.at>
Subject: Re: Converting "’" to an Apostrophe?
Message-Id: <slrnfsimrb.q77.hjp-usenet2@hrunkner.hjp.at>
On 2008-03-01 12:25, Gunnar Hjalmarsson <noreply@gunnar.cc> wrote:
> Peter J. Holzer wrote:
>> On 2008-02-29 03:41, Gunnar Hjalmarsson <noreply@gunnar.cc> wrote:
>>> A. Sinan Unur wrote:
>>>> In the mean time, here in 2008, in the docs shipped with Perl 5.10
>>>>
>>>> perldoc perlop
>>>>
>>>> s Treat string as single line. (Make . match a newline)
>>>
>>> Great, that's a clarification I wasn't aware of.
>>
>> You never read perldoc perlre?
>
> I thought it was pretty clear, both from the message to which you
> replied and from my other message in this thread, that I do.
That was a rhetorical question.
>>> Hopefully, in the future (Perl 5.12?), "perldoc perlop" will contain a
>>> useful explanation of the /m operator as well. Or at least a reference
>>> to "perldoc perlre".
>>
>> The latter is there since at least perl 5.6.0 (in the paragraph before
>> the options).
>
> That reference is placed in another context. If I didn't already know
> it, I wouldn't understand from perlop that the /m modifier is further
> explained in perlre.
But it gives you a pretty strong hint on what to read next if you don't
find the answer here. (If you see that tiny three-word sentence in the
middle of a paragraph - it is easy to miss).
> That indicates that the docs (as a whole) did not explain their
> meanings clearly enough.
I agree with that in general. The perl documentation was originally
written for a rather technical (und unix-savvy) audience and then
expanded piece by piece by several people over 2 decades. The result is
often hard to read, disjointed, missing cross-references, and
occassionally contradictionary and misleading.
But I don't think that the description of the modifiers is easy to miss
- it's right at the start of perldoc perlre, which you should read if
you are using regexps. (Petr quoted the Camel book instead of perldoc -
I've never read that and don't know how it is organized, but in any case
I'd recommend to anyone to use perldoc as the primary documentation and
any book (even if it's from Larry) as secondary, if only because it's
very likely to be several years out of date and doesn't match the
version of perl he's actually using.)
hp
------------------------------
Date: 29 Feb 2008 23:35:30 GMT
From: xhoster@gmail.com
Subject: Re: Finding number of file from gzip'ed format
Message-Id: <20080229183533.381$GG@newsreader.com>
"sopan.shewale@gmail.com" <sopan.shewale@gmail.com> wrote:
> Hi,
>
> I am not sure if this is the right group to ask this question - i am
> sorry if this is not the right place.
>
> Problem: Let us say we have file called "myfile.txt". The size of the
> file is huge. The file is gziped - the gziped filename is
> "myfile.txt.gz". I am interested to find the number of lines of
> myfile.txt from myfile.txt.gz without gunziping it.
>
> I know if it is allowed to gunzip then just use "gunzip -c
> myfile.txt.gz | wc -l" this can give the number of lines.
>
> My problem is time taken to gunzip is huge file is very large.
That is about as good as it is going to get.
>
> Is there any way to count the number of lines using Perl script/Any
> other method - just to figure out number of "\n" chars hidden inside
> the file-use something from the algorithm of gzip?
You *might* be able to come up with a shortcut that is integrated in
with the very guts of the Lempel-Ziv 77 algorithm that would allow you
to count the "\n" without actually doing the unzip, but I'm skeptical
that you could make it meaningfully faster than just gunzipping (or gzcat).
And if you try to do so in Perl rather than C, then I'm rather confident
that it would be a lot slower.
Perhaps you should pre-compute and then cache the number of lines
someplace.
Xho
--
-------------------- http://NewsReader.Com/ --------------------
The costs of publication of this article were defrayed in part by the
payment of page charges. This article must therefore be hereby marked
advertisement in accordance with 18 U.S.C. Section 1734 solely to indicate
this fact.
------------------------------
Date: Sat, 01 Mar 2008 13:01:35 +0000
From: The Natural Philosopher <a@b.c>
Subject: Re: How to set a HARD memory limit for apache
Message-Id: <1204376496.18004.1@proxy00.news.clara.net>
Ignoramus12509 wrote:
> I have a Linux server that I am configuring for Apache to me used with
> mod_perl.
>
> I want to make sure that no apache child can, ever, under any
> circumstances, exceed some memory size limit such as 300 MB.
>
> I looked at perl modules such as Apache2::Resource and
> Apache2::SizeLimit and they would not work for me. The former just
> does not do its job, and the second a) just checks memory size and b)
> does not work with threaded MPM.
>
> What I want is a very simple thing: I want an apache daemon to
> INSTANTLY DIE if it ever reaches size of X such as X = 300 MB. I do
> not want to "give them a chance". I also do not want to "check the
> size at some times (like in CleanupHandler)". I want behaviour such as
> that specified by bash ulimit function. Instant death immediately upon
> reaching the limit.
>
> The reason for this is that I do not want a memory consuming bug in my
> mod_perl code to damage my server.
>
> At the same time, I would like to set a lower limit that would exit
> apache gracefully and that would be checked from, say, a
> CleanupHandler.
>
> So, does anyone have any suggestions for what I should use.
>
> Thanks.
>
> i
Apache source, and a C compiler, and a custrome version of malloc();
------------------------------
Date: Fri, 29 Feb 2008 17:30:18 -0800
From: "szr" <szrRE@szromanMO.comVE>
Subject: Re: Magic $a $b
Message-Id: <fqabjb018dt@news2.newsguy.com>
Ben Morrow wrote:
> Quoth "szr" <szrRE@szromanMO.comVE>:
>> Joost Diepenmaat wrote:
>>>
>>> I would think:
> <snip>
>>>
>>> srt();
>>> my $a = 4711;
>>> print "$a\n";
>>>
>>> sub srt {
>>> my @arr = qw /x a u q r/;
>>> @arr = sort { $a cmp $b } @arr;
>>> }
>>>
>>> would be enough reason not to use $a and $b.
>>
>> When I try the latter, I get the following, using Perl 5.8.8:
>>
>> Can't use "my $a" in sort comparison at line 9.
>>
>> The error message itself seems to be wrong, or more percisely, the
>> wrong error for the given situation. There is no "my" in the "sort {
>> ... }" clause. Is this be a bug?
>
> No, it's not. The point is that the $a in scope at line 9 is the 'my
> $a' from five lines earlier, rather that the global $main::a in scope
> at the start of the program, and sort (for various nasty
> implementation-specfic reasons) can't use a lexical $a. This is
> exactly why you shouldn't use $a other than for sort.
Ah. Its very clear now. Thank you (and J. Gleixner) I'm nto sure why I
didn't catch that.
--
szr
------------------------------
Date: Sat, 1 Mar 2008 05:42:18 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Sat Mar 1 2008
Message-Id: <Jx1EII.D44@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-ReturnValue-0.02
http://search.cpan.org/~domm/Acme-ReturnValue-0.02/
report interesting module return values
----
Acme-ReturnValue-0.03
http://search.cpan.org/~domm/Acme-ReturnValue-0.03/
report interesting module return values
----
Apache-AuthCookie-3.11
http://search.cpan.org/~mschout/Apache-AuthCookie-3.11/
Perl Authentication and Authorization via cookies
----
Archive-Rar-2.00_02
http://search.cpan.org/~smueller/Archive-Rar-2.00_02/
Interface with the 'rar' command
----
Attribute-SubName-0.03
http://search.cpan.org/~marcel/Attribute-SubName-0.03/
Naming anonymous subroutines via attributes
----
Bundle-MARCEL-0.07
http://search.cpan.org/~marcel/Bundle-MARCEL-0.07/
install (nearly) all modules by MARCEL
----
Business-OnlinePayment-PaymenTech-1.0.2
http://search.cpan.org/~gphat/Business-OnlinePayment-PaymenTech-1.0.2/
PaymenTech backend for Business::OnlinePayment
----
Business-OnlinePayment-PaymentTech-1.0.1
http://search.cpan.org/~gphat/Business-OnlinePayment-PaymentTech-1.0.1/
----
CGI-Application-Plugin-Feedback-1.05
http://search.cpan.org/~leocharre/CGI-Application-Plugin-Feedback-1.05/
simple end user feedback method
----
CHI-0.06
http://search.cpan.org/~jswartz/CHI-0.06/
Unified cache interface
----
Class-Scaffold-0.05
http://search.cpan.org/~marcel/Class-Scaffold-0.05/
large-scale OOP application support
----
Config-Model-0.619
http://search.cpan.org/~ddumont/Config-Model-0.619/
Model to create configuration validation tool
----
Config-Model-CursesUI-1.005
http://search.cpan.org/~ddumont/Config-Model-CursesUI-1.005/
Curses interface for configuration tree
----
Config-Model-TkUi-0.101
http://search.cpan.org/~ddumont/Config-Model-TkUi-0.101/
Perl/Tk widget to edit content of Config::Model
----
DBD-Informix-2008.0229
http://search.cpan.org/~johnl/DBD-Informix-2008.0229/
IBM Informix Database Driver for Perl DBI
----
DCOP-0.037
http://search.cpan.org/~jcmuller/DCOP-0.037/
Perl extension to speak to the dcop server via system's DCOP client.
----
DCOP-Amarok-0.036
http://search.cpan.org/~jcmuller/DCOP-Amarok-0.036/
----
DCOP-Amarok-Player-0.037
http://search.cpan.org/~jcmuller/DCOP-Amarok-Player-0.037/
Perl extension to speak to an amaroK player object via system's DCOP.
----
DCOP-Amarok-Playlist-0.009
http://search.cpan.org/~jcmuller/DCOP-Amarok-Playlist-0.009/
Perl extension to speak to an amaroK player object via system's DCOP.
----
Date-Holidays-NZ-1.02
http://search.cpan.org/~samv/Date-Holidays-NZ-1.02/
Determine New Zealand public holidays
----
DateTime-0.42
http://search.cpan.org/~drolsky/DateTime-0.42/
A date and time object
----
Devel-Hook-0.001
http://search.cpan.org/~ferreira/Devel-Hook-0.001/
Mess around with BEGIN/CHECK/INIT/END blocks
----
EekBoek-1.03.10_1
http://search.cpan.org/~jv/EekBoek-1.03.10_1/
Bookkeeping software for small and medium-size businesses
----
Egg-Release-3.04
http://search.cpan.org/~lushe/Egg-Release-3.04/
Version of Egg WEB Application Framework.
----
Email-Outlook-Message-0.904
http://search.cpan.org/~mvz/Email-Outlook-Message-0.904/
Read Outlook .msg files
----
File-Log-1.05
http://search.cpan.org/~gng/File-Log-1.05/
A simple Object Orientated Logger
----
GRID-Machine-0.083
http://search.cpan.org/~casiano/GRID-Machine-0.083/
Remote Procedure Calls over a SSH link
----
Games-Ratings-0.0.3
http://search.cpan.org/~bartolin/Games-Ratings-0.0.3/
generic methods for rating calculation (e.g. chess ratings)
----
Geo-Hash-0.02
http://search.cpan.org/~andya/Geo-Hash-0.02/
Encode / decode geohash.org locations.
----
HTML-Normalize-1.0001
http://search.cpan.org/~grandpa/HTML-Normalize-1.0001/
HTML light weight cleanup
----
HTML-Normalize-1.0002
http://search.cpan.org/~grandpa/HTML-Normalize-1.0002/
HTML light weight cleanup
----
HTML-Template-Compiled-0.91_001
http://search.cpan.org/~tinita/HTML-Template-Compiled-0.91_001/
Template System Compiles HTML::Template files to Perl code
----
HTML-Widget-Factory-0.065
http://search.cpan.org/~rjbs/HTML-Widget-Factory-0.065/
churn out HTML widgets
----
List-Rotation-1.009
http://search.cpan.org/~pelagic/List-Rotation-1.009/
Loop (Cycle, Alternate or Toggle) through a list of values via a singleton object implemented as closure.
----
Log-Dispatch-Binlog-0.01
http://search.cpan.org/~nuffin/Log-Dispatch-Binlog-0.01/
Storable based binary logs.
----
Log-Dispatch-Config-TestLog-0.01
http://search.cpan.org/~nuffin/Log-Dispatch-Config-TestLog-0.01/
Set up Log::Dispatch::Config for a test run
----
Lyrics-Fetcher-0.5.1
http://search.cpan.org/~bigpresh/Lyrics-Fetcher-0.5.1/
Perl extension to manage fetchers of song lyrics.
----
Module-Load-Conditional-0.26
http://search.cpan.org/~kane/Module-Load-Conditional-0.26/
Looking up module information / loading at runtime
----
Net-Geohash-1.1
http://search.cpan.org/~sock/Net-Geohash-1.1/
The great new Net::Geohash!
----
OOB-0.04
http://search.cpan.org/~elizabeth/OOB-0.04/
out of band data for any data structure in Perl
----
OOB-0.05
http://search.cpan.org/~elizabeth/OOB-0.05/
out of band data for any data structure in Perl
----
OOB-0.06
http://search.cpan.org/~elizabeth/OOB-0.06/
out of band data for any data structure in Perl
----
Osgood-Client-1.0.4
http://search.cpan.org/~gphat/Osgood-Client-1.0.4/
Client for the Osgood Passive, Persistent Event Queue
----
Osgood-Client-1.0.5
http://search.cpan.org/~gphat/Osgood-Client-1.0.5/
Client for the Osgood Passive, Persistent Event Queue
----
PAR-Packer-0.978
http://search.cpan.org/~smueller/PAR-Packer-0.978/
PAR Packager
----
POE-Component-DBIx-MyServer-0.01_02
http://search.cpan.org/~eriam/POE-Component-DBIx-MyServer-0.01_02/
A pseudo mysql POE server
----
POE-Component-Lingua-Translate-0.05
http://search.cpan.org/~hinrik/POE-Component-Lingua-Translate-0.05/
A non-blocking wrapper around Lingua::Translate
----
Paranoid-0.18
http://search.cpan.org/~corliss/Paranoid-0.18/
Paranoia support for safer programs
----
PerlIO-via-Pipe-0.02
http://search.cpan.org/~marcel/PerlIO-via-Pipe-0.02/
PerlIO layer to filter input through a Text::Pipe
----
Pod-Generated-0.04
http://search.cpan.org/~marcel/Pod-Generated-0.04/
generate POD documentation during 'make' time
----
RDF-Server-0.01
http://search.cpan.org/~jsmith/RDF-Server-0.01/
toolkit for building RDF servers
----
RT-Client-REST-0.33
http://search.cpan.org/~dams/RT-Client-REST-0.33/
talk to RT installation using REST protocol.
----
SVN-Notify-2.70
http://search.cpan.org/~dwheeler/SVN-Notify-2.70/
Subversion activity notification
----
Template-Direct-1.14
http://search.cpan.org/~doctormo/Template-Direct-1.14/
Creates a document page based on template/datasets
----
Text-Pipe-Translate-0.03
http://search.cpan.org/~marcel/Text-Pipe-Translate-0.03/
Translate text from one language to another
----
Unix-Lsof-v0.0.2
http://search.cpan.org/~marcb/Unix-Lsof-v0.0.2/
Wrapper to the Unix lsof utility
----
VCS-Hms-0.04
http://search.cpan.org/~gmccar/VCS-Hms-0.04/
notes for the HMS implementation
----
WWW-Facebook-API-v0.4.11
http://search.cpan.org/~unobe/WWW-Facebook-API-v0.4.11/
Facebook API implementation
----
WattsUp-Daemon-0.4
http://search.cpan.org/~robbat/WattsUp-Daemon-0.4/
----
Weed-0.011_020
http://search.cpan.org/~hooo/Weed-0.011_020/
Don't use it. It's in development. For test purposes only!
----
XML-CompareML-0.2.1
http://search.cpan.org/~shlomif/XML-CompareML-0.2.1/
A processor for the CompareML markup language
----
XML-CompareML-0.2.2
http://search.cpan.org/~shlomif/XML-CompareML-0.2.2/
A processor for the CompareML markup language
----
pmtools-1.10
http://search.cpan.org/~mlfisher/pmtools-1.10/
If you're an author of one of these modules, please submit a detailed
announcement to comp.lang.perl.announce, and we'll pass it along.
This message was generated by a Perl program described in my Linux
Magazine column, which can be found on-line (along with more than
200 other freely available past column articles) at
http://www.stonehenge.com/merlyn/LinuxMag/col82.html
print "Just another Perl hacker," # the original
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: Sat, 1 Mar 2008 14:31:28 +0100
From: "Boerni" <alt_test.3.boerni@spamgourmet.com>
Subject: Re: Newbie needs help with IO::Socket (maybe IO::Select)
Message-Id: <47c95abc$1_5@news.bluewin.ch>
Thank you very much for your answer!
> Why would another client connecting to the server kick off the first one?
> If the server has gone away, the client will realize this next time it
> tries to communicate with it. While I guess it might be nice to know
> immediately that the server has gone away, plenty of very good
> client-server apps don't detect server failure until the next time it
> tries
> to communicate. I'd need a very compelling reason not to follow this
> paradigm for my own clients.
I bought one of those USB-Missilelaunchers. So what I'm trying to do is,
writing a client/server app, so everyone in my team can use it. But since
I'm the one who bought it, I wan't to be able to kick anyone connected, when
I connect :-)
But I guess it's ok, when they get the message the next time they try to
send any command to the launcher.
> You need to add STDIN (or whatever you use to communicate with the User)
> into the IO::Select, too. This means you probably have to use sysread,
> rather than <>, to read from STDIN.
>
> You are mixing buffered IO with select. This is rather dangerous. If
> the client can ever print two (or more) lines into $socket in quick
> succession, then this code might cause both of them to be read into the
> perl internal buffer, but only one of them to be returned from there
> into $buf. The next line just sits in the internal buffer, where it will
> not trigger IO::Select and hence not get read. The client won't send any
> more lines (which would trigger IO::Select) because it is waiting for a
> response to the last line it sent, and the server will never respond to
> that line because it doesn't know that it is there. Deadlock.
>
> I think IO::Select (or some subclass thereof) should return readable for
> any file handle that has data sitting in the perl internal buffer, in
> addition to the handles that have data (or eof) in the system's buffers.
> I
> haven't quite figured out how to implement that. All of those globs and
> glob refs and PerlIO layers and tied handles and scalar masquerading as
> handles are just too much for me.
>
> Xho
Thanks... I'm going to read up on this...
------------------------------
Date: Sat, 1 Mar 2008 09:29:13 +0100
From: Martijn Lievaart <m@rtij.nl.invlalid>
Subject: Re: Recommendation for a SNMP module to collect asset data from Cisco devices
Message-Id: <pan.2008.03.01.08.29.13@rtij.nl.invlalid>
On Fri, 29 Feb 2008 22:04:06 +0100, Tom Brown wrote:
> Which SNMP module could provide the best functions for my demand?
I use Net::SNMP. It's simple, effective and seems to suit your needs.
M4
------------------------------
Date: Fri, 29 Feb 2008 05:49:27 -0600
From: Tad J McClellan <tadmc@seesig.invalid>
Subject: Re: regex for chars 192 to 255
Message-Id: <slrnfsfsa7.6t2.tadmc@tadmc30.sbcglobal.net>
John <john1949@yahoo.com> wrote:
> Is there a character class like [a-zA-Z] for accented characters that lie
> between ASCII 192 and 255 (excluding 215 and 247)?
ASCII defines characters from 0-127, so 192 and 255 are not in ASCII.
--
Tad McClellan
email: perl -le "print scalar reverse qq/moc.noitatibaher\100cmdat/"
------------------------------
Date: Sat, 1 Mar 2008 09:45:00 -0000
From: "John" <john1949@yahoo.com>
Subject: Re: regex for chars 192 to 255
Message-Id: <wMCdneDvP4QhuFTanZ2dnUVZ8ternZ2d@eclipse.net.uk>
"Tad J McClellan" <tadmc@seesig.invalid> wrote in message
news:slrnfsfsa7.6t2.tadmc@tadmc30.sbcglobal.net...
> John <john1949@yahoo.com> wrote:
>
>> Is there a character class like [a-zA-Z] for accented characters that lie
>> between ASCII 192 and 255 (excluding 215 and 247)?
>
>
> ASCII defines characters from 0-127, so 192 and 255 are not in ASCII.
>
>
> --
> Tad McClellan
> email: perl -le "print scalar reverse qq/moc.noitatibaher\100cmdat/"
Thanks. I should have said extended ASCII
Regards
John
------------------------------
Date: Sat, 01 Mar 2008 10:54:25 GMT
From: Jürgen Exner <jurgenex@hotmail.com>
Subject: Re: regex for chars 192 to 255
Message-Id: <ebdis3tl2eftmfnhb7uirv7kk6v86ddj5t@4ax.com>
"John" <john1949@yahoo.com> wrote:
>"Tad J McClellan" <tadmc@seesig.invalid> wrote in message
>> John <john1949@yahoo.com> wrote:
>>> Is there a character class like [a-zA-Z] for accented characters that lie
>>> between ASCII 192 and 255 (excluding 215 and 247)?
>>
>> ASCII defines characters from 0-127, so 192 and 255 are not in ASCII.
>
>Thanks. I should have said extended ASCII
Which is highly ambigious in itself because first of all it is used to
describe different things, e.g. characters that are not ASCII, latin
characters that are not ASCII, ASCII characters plus latin characters that
are not ASCII. And second it doesn't specify the encoding.
jue
------------------------------
Date: Sat, 1 Mar 2008 14:39:14 +0100
From: "Peter J. Holzer" <hjp-usenet2@hjp.at>
Subject: Re: regex for chars 192 to 255
Message-Id: <slrnfsin42.q77.hjp-usenet2@hrunkner.hjp.at>
On 2008-02-29 11:54, John W. Krahn <someone@example.com> wrote:
> John wrote:
>> Is there a character class like [a-zA-Z] for accented characters that lie
>> between ASCII 192 and 255 (excluding 215 and 247)?
>
> Using hexadecimal: [\xC0-\xD6\xD8-\xF6\xF8-\xFF] or using octal:
> [\300-\326\330-\366\370-\377]
Why did you exclude D7 and F7? Sure, they are not "accented" in Latin-1,
but neither are some other characters in that range.
hp
------------------------------
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 1322
***************************************
