[24592] in Perl-Users-Digest
Perl-Users Digest, Issue: 6768 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Jul 5 14:05:57 2004
Date: Mon, 5 Jul 2004 11:05:06 -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, 5 Jul 2004 Volume: 10 Number: 6768
Today's topics:
Re: Cleanup file path <ymartin@nospam.fr>
Re: Cleanup file path (Peter J. Acklam)
Digest::Base HELP! <root@slate.comm.ad.roke.co.uk>
Re: Digest::Base HELP! <tony_curtis32@yahoo.com>
Re: finding every combination of n values at y position (another one)
Re: How To do a Simple Convert of A single-tag HTML To <jurgenex@hotmail.com>
Newbie queries <iss025@bangor.ac.uk>
Re: Newbie queries <postmaster@castleamber.com>
Re: Newbie queries <ithinkiam@gmail.com>
Re: Newbie queries <postmaster@castleamber.com>
Re: Newbie queries <jurgenex@hotmail.com>
Re: Newbie queries <postmaster@castleamber.com>
Re: Newbie: Simple problem with htm file. <tadmc@augustmail.com>
Re: Newbie: Simple problem with htm file. <jurgenex@hotmail.com>
Re: read COBOL index file with perl <tadmc@augustmail.com>
Re: read COBOL index file with perl <gabriell@programmer.net>
Re: Regex to extract CSV file (Alf Timms)
Re: Regex to extract CSV file <uri@stemsystems.com>
Re: Request for comments on a JPEG metadata Perl module <bettelli@cpan.org>
Want comma in printed numbers not dot. How? moller@notvalid.se
Re: which book to learn Perl (Randal L. Schwartz)
Re: which book to learn Perl <uri@stemsystems.com>
Re: which book to learn Perl <norfernuman@yahoo.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 05 Jul 2004 17:23:26 +0200
From: Yves Martin <ymartin@nospam.fr>
Subject: Re: Cleanup file path
Message-Id: <f6y8lytr4h.fsf@pcyma.elca.ch>
pjacklam@online.no (Peter J. Acklam) writes:
> Yves Martin <ymartin@nospam.fr> wrote:
>
>> I'm looking for a way to clean file paths like the following:
>> ~/dir1/../dir2
>> ~/dir1/../dir2/f1
>> ~/dir1/./dir2/f1
>> /dir1/../dir2
>> /dir1/../dir2/f1
>> /dir1/./dir2/f1
Sorry for the misunderstanding, just forget what I said about
'realpath'.
My aim is not to get the real path of a file BUT to clean up file
paths according to the following examples:
~/dir1/../dir2 -> ~/dir2
~/dir1/../dir2/f1 -> ~/dir2/f1
~/dir1/./dir2/f1 -> ~/dir1/dir2/f1
/dir1/../dir2 -> /dir2
/dir1/../dir2/f1 -> /dir2/f1
/dir1/./dir2/f1 -> /dir1/dir2/f1
I have tried many things: File::Spec->canonpath, Cwd->realpath
... and realpath was the closest I found with the drawbacks I
enumerated.
So I'm just looking for a function/package than may achieve the
clean up I described in a multi-platform way without checking the
filesystem.
Sorry again.
--
Yves Martin
------------------------------
Date: 05 Jul 2004 19:08:10 +0200
From: pjacklam@online.no (Peter J. Acklam)
Subject: Re: Cleanup file path
Message-Id: <smc6wfet.fsf@online.no>
Yves Martin <ymartin@nospam.fr> wrote:
> My aim is not to get the real path of a file BUT to clean up
> file paths according to the following examples:
>
> ~/dir1/../dir2 -> ~/dir2
> ~/dir1/../dir2/f1 -> ~/dir2/f1
> ~/dir1/./dir2/f1 -> ~/dir1/dir2/f1
> /dir1/../dir2 -> /dir2
> /dir1/../dir2/f1 -> /dir2/f1
> /dir1/./dir2/f1 -> /dir1/dir2/f1
>
> I have tried many things: File::Spec->canonpath, Cwd->realpath
> ... and realpath was the closest I found with the drawbacks I
> enumerated.
I see, so it's ok that '~/dir1/../dir2' becomes '~/dir2' even if
they are actually two different directories?
Oh, well, try this:
sub trimpath {
local $_ = shift;
require File::Spec::Functions;
$_ = File::Spec::Functions::canonpath($_);
# /foo/bar/../baz -> /foo/baz
1 while s{/(?!\.\.?/)[^/]+/\.\.(/|$)}{$1}gx;
# /../../foo -> /foo
s|^/(\.\./)+|/|;
return $_;
}
Peter
--
#!/local/bin/perl5 -wp -*- mode: cperl; coding: iso-8859-1; -*-
# matlab comment stripper (strips comments from Matlab m-files)
s/^((?:(?:[])}\w.]'+|[^'%])+|'[^'\n]*(?:''[^'\n]*)*')*).*/$1/x;
------------------------------
Date: Mon, 05 Jul 2004 17:26:15 +0100
From: root <root@slate.comm.ad.roke.co.uk>
Subject: Digest::Base HELP!
Message-Id: <pan.2004.07.05.16.26.15.548962@slate.comm.ad.roke.co.uk>
Sorry for my ignornance, but I need to install the Digest::Base CPAN
module into the default Perl 5.8.0 install of RH9.0 to satisfy some
dependancies, but cannot obviously work out how to do it (there is no
Makefile.PL).
Can anyone help me with this. It's pretty urgent.
Thanks
Tony
------------------------------
Date: Mon, 05 Jul 2004 11:31:43 -0500
From: Tony Curtis <tony_curtis32@yahoo.com>
Subject: Re: Digest::Base HELP!
Message-Id: <87smc6h0uo.fsf@limey.hpcc.uh.edu>
>> On Mon, 05 Jul 2004 17:26:15 +0100,
>> root <root@slate.comm.ad.roke.co.uk> said:
> Sorry for my ignornance, but I need to install the
> Digest::Base CPAN module into the default Perl 5.8.0 install
> of RH9.0 to satisfy some dependancies, but cannot obviously
> work out how to do it (there is no Makefile.PL).
> Can anyone help me with this. It's pretty urgent.
# perl -MCPAN -e 'install Digest::Base'
------------------------------
Date: Mon, 05 Jul 2004 15:28:33 +0100
From: "Steve (another one)" <y66y@56yu4b6.com>
Subject: Re: finding every combination of n values at y positions
Message-Id: <ccboii$f0k$1@news.liv.ac.uk>
John W. Krahn wrote:
> "Steve (another one)" wrote:
>
>>I have just wasted a crazy amount of time trying to populate an array
>>containing every combination of n values at y positions. It feels as
>>though it should be trivial and the sort of thing I do every day, but in
>>fact I could not find the simple solution that surely must exist.
>>
>>Below is my best attempt - it will also explain the task if I haven't
>>been clear - can someone tell me if there is a simpler way of doing it.
>>
>>[snip]
>
>
> You could do it like this:
>
> #!/usr/bin/perl
> use warnings;
> use strict;
>
> my $min_value = 1;
> my $max_value = 4;
> my $number_of_positions = 3;
>
> my $glob = ( '{' . join( ',', $min_value .. $max_value ) . '}' ) x $number_of_positions;
>
> $individual = 0;
> print $individual++, " - @$_\n" for map [ /./g ], glob $glob;
>
> __END__
>
>
> :-)
>
> John
cool, what a brilliant way to do it :-)
------------------------------
Date: Mon, 05 Jul 2004 16:31:07 GMT
From: "Jürgen Exner" <jurgenex@hotmail.com>
Subject: Re: How To do a Simple Convert of A single-tag HTML To XML?
Message-Id: <fnfGc.12237$Xq4.2144@nwrddc02.gnilink.net>
valued customer wrote:
> I have the following HTML code:
>
> <code><b>Être en colère</b></code>
>
> How do I convert that to well-formed XML?
This example is well-formed XML
- every opening tag has a corresponding closing tag
- the tags are properly nested
- there is only one root tag
> I tried using HTML::Entities, but this does not produce well-formed
> XML because it creates undefined entity references.
>
> So how can it be done?
Maybe you have an encoding problem rather then an XML problem?
jue
------------------------------
Date: Mon, 05 Jul 2004 15:58:11 +0100
From: "P.R.Brady" <iss025@bangor.ac.uk>
Subject: Newbie queries
Message-Id: <40E96C83.7030106@bangor.ac.uk>
I just can't find answers in the FAQ. It tells you how to do clever
things but I just can't find the simple things.
Q1: Is there an index to the FAQ? If not , how do you find your way
round it?
Q2: How do I exit gracefully from a program? Die is a crash close, but
is there a 'clean' finish, other than dribbling down to the end of the
source file?
Q3: I start my scripts typically with 'perl -w myprog.pl'.
How do I supply run time parameters to my program? What puts them in
@ARGV? A possibly related question - why am I entreated to put the
first line of my script as:
#!c:\perl\perl.exe -w (I'm running under windoze)?
Q4: How do I declare global variables so that 'use strict;' is satisfied?
Regards
Phil
------------------------------
Date: Mon, 05 Jul 2004 10:40:10 -0500
From: John Bokma <postmaster@castleamber.com>
Subject: Re: Newbie queries
Message-Id: <40e9765d$0$875$58c7af7e@news.kabelfoon.nl>
P.R.Brady wrote:
> I just can't find answers in the FAQ. It tells you how to do clever
> things but I just can't find the simple things.
>
> Q1: Is there an index to the FAQ? If not , how do you find your way
> round it?
perldoc perldoc (on the command line)
> Q2: How do I exit gracefully from a program? Die is a crash close, but
> is there a 'clean' finish, other than dribbling down to the end of the
> source file?
perldoc -f exit
> Q3: I start my scripts typically with 'perl -w myprog.pl'.
> How do I supply run time parameters to my program? What puts them in
> @ARGV? A possibly related question - why am I entreated to put the
> first line of my script as:
> #!c:\perl\perl.exe -w (I'm running under windoze)?
Not needed on Windows since .pl is probably "connected" with perl.exe,
ie. script.pl in cmd.exe should perl.exe the script.
use warnings;
instead of the -w switch
So on windows your first lines could look like:
use strict;
use warnings;
print "Hello, world!\n";
exit;
running it:
> hello.pl
Hello, world!
parameters, just add them:
script.pl par1 par2 par3 ... parn
> Q4: How do I declare global variables so that 'use strict;' is satisfied?
perldoc -f our
perldoc -f my
--
John MexIT: http://johnbokma.com/mexit/
personal page: http://johnbokma.com/
Experienced Perl programmer available: http://castleamber.com/
Happy Customers: http://castleamber.com/testimonials.html
------------------------------
Date: Mon, 05 Jul 2004 16:54:23 +0100
From: Chris Cole <ithinkiam@gmail.com>
Subject: Re: Newbie queries
Message-Id: <pan.2004.07.05.15.54.21.916758@gmail.com>
On Mon, 05 Jul 2004 15:58:11 +0100, P.R.Brady wrote:
> I just can't find answers in the FAQ. It tells you how to do clever
> things but I just can't find the simple things.
>
> Q1: Is there an index to the FAQ? If not , how do you find your way
> round it?
Have you tried searching? Either the /term/ construct in perldoc or
whatever browser/reader's specific search tool.
> Q2: How do I exit gracefully from a program? Die is a crash close, but
> is there a 'clean' finish, other than dribbling down to the end of the
> source file?
exit;
> Q3: I start my scripts typically with 'perl -w myprog.pl'.
> How do I supply run time parameters to my program? What puts them in
> @ARGV? A possibly related question - why am I entreated to put the
> first line of my script as:
> #!c:\perl\perl.exe -w (I'm running under windoze)?
Run-time parameters are passed as a space-delimited list and place in
@ARGV (not sure by what). What you do with them in your script is up to
you. See Getopt::Long module for some ideas.
I don't do perl on windoze, so I can't answer the rest as in linux you can
do either 'perl -w myprog.pl' without a shebang (#!) line or just run
'./myprog.pl' with.
> Q4: How do I declare global variables so that 'use strict;' is satisfied?
Declare 'my $var;' outside of any block and it will be available globally
e.g.:
#! perl
use strict;
use warnings;
my $var = 1;
while (<>) {
if ($var) {
do stuff...;
exit;
}
}
exit;
> Regards
> Phil
HTH
Chris.
------------------------------
Date: Mon, 05 Jul 2004 10:59:20 -0500
From: John Bokma <postmaster@castleamber.com>
Subject: Re: Newbie queries
Message-Id: <40e97add$0$882$58c7af7e@news.kabelfoon.nl>
John Bokma wrote:
>> Q4: How do I declare global variables so that 'use strict;' is
>> satisfied?
>
> perldoc -f our
> perldoc -f my
Just a side note, global *variables* are often a bad idea. You can use
global constants with for example:
use constant PI => 3.14;
read the warnings that come with this pragma.
Personally I use either a var I pass around, or better, I use a class.
--
John MexIT: http://johnbokma.com/mexit/
personal page: http://johnbokma.com/
Experienced Perl programmer available: http://castleamber.com/
Happy Customers: http://castleamber.com/testimonials.html
------------------------------
Date: Mon, 05 Jul 2004 16:36:27 GMT
From: "Jürgen Exner" <jurgenex@hotmail.com>
Subject: Re: Newbie queries
Message-Id: <fsfGc.12260$Xq4.1234@nwrddc02.gnilink.net>
P.R.Brady wrote:
> I just can't find answers in the FAQ. It tells you how to do clever
> things but I just can't find the simple things.
>
> Q1: Is there an index to the FAQ? If not , how do you find your way
> round it?
perldoc perlfaq
> Q2: How do I exit gracefully from a program? Die is a crash close,
> but is there a 'clean' finish, other than dribbling down to the end
> of the source file?
perldoc -f exit
> Q3: I start my scripts typically with 'perl -w myprog.pl'.
It is easier to use
use warnings;
instead of "-w"
> How do I supply run time parameters to my program?
Just type them .....
> What puts them in @ARGV?
Your command shell (even if it's just DOS) and the Perl interpreter
> A possibly related question - why am I entreated to put the
> first line of my script as:
> #!c:\perl\perl.exe -w (I'm running under windoze)?
Will simply be ignored by DOS but doesn't cause any harm either
> Q4: How do I declare global variables so that 'use strict;' is
> satisfied?
You use "my $foo;" do declare the scalar $foo. Don't remember in which Fine
Manual this is described, though.
jue
------------------------------
Date: Mon, 05 Jul 2004 12:56:05 -0500
From: John Bokma <postmaster@castleamber.com>
Subject: Re: Newbie queries
Message-Id: <40e99637$0$877$58c7af7e@news.kabelfoon.nl>
Jürgen Exner wrote:
>>first line of my script as:
>>#!c:\perl\perl.exe -w (I'm running under windoze)?
>
> Will simply be ignored by DOS but doesn't cause any harm either
But needed if you are using Apache webserver
--
John MexIT: http://johnbokma.com/mexit/
personal page: http://johnbokma.com/
Experienced Perl programmer available: http://castleamber.com/
Happy Customers: http://castleamber.com/testimonials.html
------------------------------
Date: Mon, 5 Jul 2004 09:27:49 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: Newbie: Simple problem with htm file.
Message-Id: <slrnceipb5.smr.tadmc@magna.augustmail.com>
John Smith <johnsmith@john.com> wrote:
> I am having a problem reading a file
[snip ...]
> that is in html format.
> Thanks for any assistance you can provide.
Have you seen the Perl FAQs about processing HTML?
perldoc -q HTML
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 05 Jul 2004 16:44:20 GMT
From: "Jürgen Exner" <jurgenex@hotmail.com>
Subject: Re: Newbie: Simple problem with htm file.
Message-Id: <EzfGc.12294$Xq4.3510@nwrddc02.gnilink.net>
Walter Roberson wrote:
> In article <0P6Gc.27284$P7.12816@pd7tw3no>,
> John Smith <johnsmith@john.com> wrote:
>> I have been using the open command to read and write to some text
>> files and things are fine. When I open and read these htm log files
>> Perl seems to be adding an extra space after each character. For
>> example:
> :< H e a d e r >
>> T a p e L o g
>
> Just a guess -- but I suspect the html file is utf8. See perldoc utf8
For English characters there is no binary difference whatsoever between
UTF-8, ASCII, ISO-Latin-1, Windows-1252, etc, etc. That's one reason why
programmers from English speaking countries typically are so ignorant about
code pages. They just don't care because they don't need to care. Even if
they write the code for ASCII and they receive UTF-8 data, it will still
work for their English only test data.
The symptons described by the OP are pointing more towards the direction of
UTF-16.
jue
------------------------------
Date: Mon, 5 Jul 2004 09:23:41 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: read COBOL index file with perl
Message-Id: <slrnceip3d.smr.tadmc@magna.augustmail.com>
Gabkin <gabriell@programmer.net> wrote:
> I need to parse a COBOL index file using a perl script.
> I don't know _that_ much about COBOL but it seems the index file is
> written in some kind of binary format, its not ASCII, thats for sure!
>
> Has this been done before?
Google Groups is your friend:
http://groups.google.com/groups?as_q=Cobol&as_ugroup=comp.lang.perl.misc
> Is there an existing library I can use for this?
CPAN is your friend:
http://search.cpan.org/search?query=cobol&mode=all
> Does anyone know how COBOL writes its index files
Usenet is your friend:
comp.lang.cobol
Which leads you to your new friend, Google Groups, again:
http://groups.google.com/groups?as_epq=index%20file&as_ugroup=comp.lang.cobol
> and how I could go
> about parsing them with perl?
perldoc -f pack
perldoc -f unpack
perldoc -f seek
perldoc -f read
> Or is there a simple way to read and parse binary style data?
^^^^^^
The Perl FAQ is your friend:
perldoc -q binary
How do I handle binary data correctly?
How do I randomly update a binary file?
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 05 Jul 2004 16:35:18 +0200
From: Gabkin <gabriell@programmer.net>
Subject: Re: read COBOL index file with perl
Message-Id: <2kt796F63vj3U1@uni-berlin.de>
<selective snippings>
>>Has this been done before?
> Google Groups is your friend:
>
> http://groups.google.com/groups?as_q=Cobol&as_ugroup=comp.lang.perl.misc
>
>>Is there an existing library I can use for this?
>
>
> CPAN is your friend:
>
> http://search.cpan.org/search?query=cobol&mode=all
>
>>Does anyone know how COBOL writes its index files
>
> Usenet is your friend:
>
> comp.lang.cobol
>
> Which leads you to your new friend, Google Groups, again:
>
> http://groups.google.com/groups?as_epq=index%20file&as_ugroup=comp.lang.cobol
>
>>Or is there a simple way to read and parse binary style data?
>
> ^^^^^^
>
> The Perl FAQ is your friend:
>
> perldoc -q binary
>
> How do I handle binary data correctly?
> How do I randomly update a binary file?
>
>
Wow, whatalot of friends I've got!
Thanks, will check out those sources.
------------------------------
Date: 5 Jul 2004 06:12:48 -0700
From: halvetime@yahoo.co.uk (Alf Timms)
Subject: Re: Regex to extract CSV file
Message-Id: <d18fafb9.0407050512.3a0c8f8d@posting.google.com>
anno4000@lublin.zrz.tu-berlin.de (Anno Siegel) wrote in message news:<ccau8v$3q8$1@mamenchi.zrz.TU-Berlin.DE>...
> Vito Corleone <corleone@godfather.com> wrote in comp.lang.perl.misc:
> > Hi,
> >
> > I have CSV file that looks like this:
> > 1,this is the title,2004/03/05,this is details
> > 2,another title,2004/05/05,another details
> >
> > And I extract it using split like this:
> > @row = split(",", $line);
> >
> > The problem is, if there is coma in text, it will turn to this:
> > 1,"title , with coma",2004/03/05,and the details
> > 2,title without coma,2004/05/09,"but details, has coma"
>
> That is a FAQ: "How can I split a [character] delimited string except
> when inside [character]?"
>
> > Is there any efficient way to extract this?
>
> A search on CPAN for "CSV" would have shown you a handful of modules
> for that purpose.
>
> Anno
vito,
these things are best done quickly with a regular expression. no need for cpan here:
@row = $line =~ /([^",]+|"[^"]+")/g;
still one problem. double-quoted elements are still double-quoted. easily fixed:
foreach( @row ) { s/^"(.*)"$/$1/ }
alf
------------------------------
Date: Mon, 05 Jul 2004 14:50:44 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: Regex to extract CSV file
Message-Id: <x7acyecxto.fsf@mail.sysarch.com>
>>>>> "AT" == Alf Timms <halvetime@yahoo.co.uk> writes:
AT> these things are best done quickly with a regular expression. no need for cpan here:
AT> @row = $line =~ /([^",]+|"[^"]+")/g;
and what about embedded "'s in a field?
AT> still one problem. double-quoted elements are still double-quoted. easily fixed:
AT> foreach( @row ) { s/^"(.*)"$/$1/ }
more than one problem left.
these things are best done quickly and CORRECTLY by a module.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: Mon, 05 Jul 2004 15:12:15 +0200
From: Stefano Bettelli <bettelli@cpan.org>
Subject: Re: Request for comments on a JPEG metadata Perl module
Message-Id: <pan.2004.07.05.13.12.15.44579@cpan.org>
Il giorno Sat, 26 Jun 2004 19:57:26 +0200, Stefano Bettelli scrisse:
> 2) What is the best name for the module?
> I am currently using Image::MetaInfo::JPEG.
Since I am getting paranoid about the correct name-space,
what do you think about the following:
Physics Meta-physics
Language Meta-Language
Meta is a prefix meaning (in current British English)
"at a level above". In our case, MetaInfo would imply that
there are Infos somewhere at a lower level. But this does
not appear to be the case. In fact, Gisle Aas' module is
name Image::Info, not Image::MetaInfo, and it obviously
refers to the same level as we do. But Image::Info::JPEG is
already used. So what about:
Image::MetaInfo --> Image::MetaData ?
------------------------------
Date: Mon, 05 Jul 2004 13:17:46 GMT
From: moller@notvalid.se
Subject: Want comma in printed numbers not dot. How?
Message-Id: <uzn6e1tjw.fsf@notvalid.se>
I thought this wold be simple, but after fooling
around with POSIX and locale I cant get it to
work.
LC_NUMERIC stays C no matter what I try.
Using Activestate perl on WIN-XP Swedish version.
I would apreciate any pointers so that I can
get rid of the
$n =~ y/\./,/;
Im using as a fix now.
I have read perldoc perllocale but no luck
with those examples either.
/moller
------------------------------
Date: Mon, 05 Jul 2004 14:55:46 GMT
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: which book to learn Perl
Message-Id: <e39e7c42dd8ca98ae1ecd3b006847ecf@news.teranews.com>
>>>>> "Henry" == Henry Law <lawshouse.public@btconnect.com> writes:
Henry> "And just what do you mean by that, sonny? Judging by
Henry> your previous posting record on here, Randal has
Henry> forgotten more about coding in general and Perl in
Henry> particular than you'll ever learn."
Actually, that could be a statement that is more about my memory
skills than my Perl skills. :)
--
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: Mon, 05 Jul 2004 15:11:52 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: which book to learn Perl
Message-Id: <x77jticwuh.fsf@mail.sysarch.com>
>>>>> "HL" == Henry Law <lawshouse.public@btconnect.com> writes:
HL> On 4 Jul 2004 11:05:14 GMT, anno4000@lublin.zrz.tu-berlin.de (Anno
HL> Siegel) wrote:
>> krakle <krakle@visto.com> wrote in comp.lang.perl.misc:
>>
>>> Randal Schwartz blah..
>>
>> Thank you for that insightful comment.
HL> Oh, Anno; you've let me down.
HL> I'd composed a reply to this something along the lines of
HL> "And just what do you mean by that, sonny? Judging by
HL> your previous posting record on here, Randal has
HL> forgotten more about coding in general and Perl in
HL> particular than you'll ever learn."
HL> Then I thought "No, Anno or Uri or somebody will compose a better
HL> reply than that" and I cancelled it.
that troll doesn't deserve a proper put down. the best punishment for
trolls is letting them stay as themselves. they know not how bad they
are.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: Mon, 05 Jul 2004 15:23:08 GMT
From: norfernuman <norfernuman@yahoo.com>
Subject: Re: which book to learn Perl
Message-Id: <wneGc.6749$8q3.5389@newssvr25.news.prodigy.com>
Uri Guttman wrote:
>>>>>>"HL" == Henry Law <lawshouse.public@btconnect.com> writes:
>
>
> HL> On 4 Jul 2004 11:05:14 GMT, anno4000@lublin.zrz.tu-berlin.de (Anno
> HL> Siegel) wrote:
>
> >> krakle <krakle@visto.com> wrote in comp.lang.perl.misc:
> >>
> >>> Randal Schwartz blah..
> >>
> >> Thank you for that insightful comment.
>
> HL> Oh, Anno; you've let me down.
>
> HL> I'd composed a reply to this something along the lines of
>
> HL> "And just what do you mean by that, sonny? Judging by
> HL> your previous posting record on here, Randal has
> HL> forgotten more about coding in general and Perl in
> HL> particular than you'll ever learn."
>
> HL> Then I thought "No, Anno or Uri or somebody will compose a better
> HL> reply than that" and I cancelled it.
>
> that troll doesn't deserve a proper put down. the best punishment for
> trolls is letting them stay as themselves. they know not how bad they
> are.
>
> uri
>
As the wise man put it, "...strokes for the back of stupid ones".
You can't reason with them, because they are too stupid to know they're
stupid.
As the statistics for last month showh, it just lets them highjack the group.
- NN
------------------------------
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 V10 Issue 6768
***************************************
