[30277] in Perl-Users-Digest
Perl-Users Digest, Issue: 1520 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu May 8 11:09:46 2008
Date: Thu, 8 May 2008 08:09:14 -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 Thu, 8 May 2008 Volume: 11 Number: 1520
Today's topics:
Re: 2 simple questions <achimpeters@gmx.de>
Is this expected in a foreach()? <gowthamgowtham@gmail.com>
Re: Is this expected in a foreach()? <peter@makholm.net>
Re: Is this expected in a foreach()? <gowthamgowtham@gmail.com>
Re: Is this expected in a foreach()? <rvtol+news@isolution.nl>
Re: Is this expected in a foreach()? <yankeeinexile@gmail.com>
Perl DBI Module: SQL query where there is space in fiel ambarish.mitra@gmail.com
Re: perl PNG image searching <zentara@highstream.net>
Re: perl PNG image searching <josef.moellers@fujitsu-siemens.com>
Selected cipher type not supported by server <lovecreatesbeauty@gmail.com>
Re: Selected cipher type not supported by server <rvtol+news@isolution.nl>
Re: Selected cipher type not supported by server <lovecreatesbeauty@gmail.com>
Re: state of Erlang? <ro.naldfi.scher@gmail.com>
Re: The Importance of Terminology's Quality (Robert Maas, http://tinyurl.com/uh3t)
Re: The Importance of Terminology's Quality <lew@lewscanon.com>
Re: The Importance of Terminology's Quality <lew@lewscanon.com>
Re: The Importance of Terminology's Quality <spamtrap@dot-app.org>
Re: Using Win32::OLE('in') <benkasminbullock@gmail.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 08 May 2008 14:06:09 +0200
From: Achim Peters <achimpeters@gmx.de>
Subject: Re: 2 simple questions
Message-Id: <4822ecb1$0$7551$9b4e6d93@newsspool1.arcor-online.net>
amirovic@googlemail.com schrieb:
> For the second
> question I needed to save the number without the 'e' in a further
> variable which later was converted to a sting.
If it was only _later_ converted to string, then _before_ that it was
still a number in your "further variable", right? But having or not
having an "e" is not a property of a number but rather of its printed
representation only. So until you actually convert the number to a
string later, it's meaningless whether it's "with" or "without the 'e'".
JFTR.
Bye
Achim
------------------------------
Date: Thu, 8 May 2008 06:47:28 -0700 (PDT)
From: Gowtham <gowthamgowtham@gmail.com>
Subject: Is this expected in a foreach()?
Message-Id: <0eac4b4a-4c3c-4d5c-86b7-1ad9e01ac52b@k37g2000hsf.googlegroups.com>
Is this expected? I feel changes to $b shouldn't change the array
@a ...
DB<26> @a = qw/ A B C /;
DB<27> foreach my $b ( @a ) { $b =~ s/([A-Z])/lc $1/e; }
DB<28> x @a
0 'a'
1 'b'
2 'c'
This is perl 5.8.8
Thanks
Gowtham
------------------------------
Date: Thu, 08 May 2008 13:51:52 +0000
From: Peter Makholm <peter@makholm.net>
Subject: Re: Is this expected in a foreach()?
Message-Id: <874p98hpjb.fsf@hacking.dk>
Gowtham <gowthamgowtham@gmail.com> writes:
> Is this expected? I feel changes to $b shouldn't change the array
> @a ...
Yes it is expected and well documented. You feeling is wrong. Read
'perldoc perlsyn':
If any element of LIST is an lvalue, you can modify it by modifying VAR
inside the loop. Conversely, if any element of LIST is NOT an lvalue,
any attempt to modify that element will fail. In other words, the
"foreach" loop index variable is an implicit alias for each item in the
list that you're looping over.
> This is perl 5.8.8
I belive the above to be true for all perl-versions I have worked
with.
//Makholm
------------------------------
Date: Thu, 8 May 2008 07:06:05 -0700 (PDT)
From: Gowtham <gowthamgowtham@gmail.com>
Subject: Re: Is this expected in a foreach()?
Message-Id: <9cf83f44-557a-4d92-b31d-d03310faa92c@34g2000hsh.googlegroups.com>
On May 8, 6:51 pm, Peter Makholm <pe...@makholm.net> wrote:
> Gowtham <gowthamgowt...@gmail.com> writes:
> > Is this expected? I feel changes to $b shouldn't change the array
> > @a ...
>
> Yes it is expected and well documented. You feeling is wrong. Read
> 'perldoc perlsyn':
>
> If any element of LIST is an lvalue, you can modify it by modifying VAR
> inside the loop. Conversely, if any element of LIST is NOT an lvalue,
> any attempt to modify that element will fail. In other words, the
> "foreach" loop index variable is an implicit alias for each item in the
> list that you're looping over.
>
> > This is perl 5.8.8
>
> I belive the above to be true for all perl-versions I have worked
> with.
>
> //Makholm
Ok. How is an lvalue defined? Is it something to which we can assign
something?
Something which can be the part of the left hand side of an assignment
expression
right?
But, here the list @a contains literal strings and not references to
other variables.
I know I am wrong but would like to understand how an lvalue is
defined in general and
how particularly in perl. It will also be helpful if somebody can give
examples for non-lvalues...
Thanks again
Gowtham
------------------------------
Date: Thu, 8 May 2008 16:05:03 +0200
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: Re: Is this expected in a foreach()?
Message-Id: <fvv8c8.2ck.1@news.isolution.nl>
Gowtham schreef:
> Is this expected? I feel changes to $b shouldn't change the array
> @a ...
>
> DB<26> @a = qw/ A B C /;
>
> DB<27> foreach my $b ( @a ) { $b =~ s/([A-Z])/lc $1/e; }
>
> DB<28> x @a
> 0 'a'
> 1 'b'
> 2 'c'
<quote src="perlsyn">
If any element of LIST is an lvalue, you can modify it by modifying VAR
inside the loop. Conversely, if any element of LIST is NOT an lvalue,
any attempt to modify that element will fail. In other words, the
"foreach" loop index variable is an implicit alias for each item in the
list that you're looping over.
</quote>
--
Affijn, Ruud
"Gewoon is een tijger."
------------------------------
Date: 08 May 2008 10:05:30 -0500
From: Lawrence Statton <yankeeinexile@gmail.com>
Subject: Re: Is this expected in a foreach()?
Message-Id: <873aoszvid.fsf@hummer.cluon.com>
Gowtham <gowthamgowtham@gmail.com> writes:
> Ok. How is an lvalue defined? Is it something to which we can assign
> something?
Yes.
> Something which can be the part of the left hand side of an assignment
> expression
> right?
Also yes.
>
> But, here the list @a contains literal strings and not references to
> other variables.
but $a[0] is a variable, and not a literal string. The array @a is
being aliased, not the constants that were used to initialize the
array.
Had you written:
for my $b ( qw / A B C / ) { ... }
You would have gotten the "Modification of read-only value".
> Thanks again
> Gowtham
>
--
--
Lawrence Statton - lawrenabae@abaluon.abaom s/aba/c/g
Computer software consists of only two components: ones and
zeros, in roughly equal proportions. All that is required is to
place them into the correct order.
------------------------------
Date: Thu, 8 May 2008 07:00:10 -0700 (PDT)
From: ambarish.mitra@gmail.com
Subject: Perl DBI Module: SQL query where there is space in field name
Message-Id: <24adc937-4f49-470f-a67d-beb315918e77@d19g2000prm.googlegroups.com>
Hi all,
Using the DBI module, I have connected to a CSV file, and am trying to
execute SQL queries on the CSV file. I am stuck when there is a space
in the field name and I cannot proceed.
The CSV file col heading:
"Attribute","Display Name","Semantic Type","Display Type". (ie, space
in the heading)
I am trying to "prepare" only those lines for which 'Display Type' is
given.
The error line is given:
my $sth = $dbh->prepare("select * from report where [Display Type]
=MultiLineText");
SQL ERROR: Bad table or column name '[Display Type]' has chars not
alphanumeric or underscore!
SQL ERROR: Couldn't find predicate!
I have tried some googling and also tried multiple combination of
brackets/qoutes/escapes with a hope that one of them will work, but
without luck.
Question: What is the way to fire this command in PERL where the field
name (and value as well) can have spaces?
Regards,
Ambarish.
------------------------------
Date: Thu, 08 May 2008 07:21:25 -0400
From: zentara <zentara@highstream.net>
Subject: Re: perl PNG image searching
Message-Id: <r3o5249od7vtudi4qdtrttd2af9i3rsv41@4ax.com>
On Wed, 7 May 2008 23:41:38 +0900, "Ben Bullock"
<benkasminbullock@gmail.com> wrote:
>"zentara" <zentara@highstream.net> wrote in message
>news:blb324t9ilinko2ct7qf3f6qpc87mruet6@4ax.com...
>
>> This is just a brainstorm, :-)
>> but you might be able to do some sort
>> of binary regex search of the larger images. You would have to strip
>> off the png header of the smaller image.
>
>As far as I know, PNG is a compressed format, so it's not possible to access
>the actual pixel data just by "stripping off the png header".
Well then, you probably can convert each pixel to rgb values, and
compare the following hex data:
Pixel Data looks like:
ffffff00 e7e7ffff e7e7ffff e7e7ffff e7e7ffff e7e7ffff e7e7ffff e7e7ffff
e7e7ffff e7e7ffff e7e7ffff e7e7ffff e7e7ffff e7e7ffff e7e7ffff e7e7ffff
ffffff00 ffffff00 ffffff00 ffffff00
The nice thing about pixel rgb data, is you can then set some
sort of threshold for a close match.
#!/usr/bin/perl
#None of these is fast, mainly because of the overhead of calling Perl
#code for each pixel.
use strict;
my $imagefile = shift or die "No file specified\n";
sub rgba2hex {
sprintf "%02x%02x%02x%02x", map { $_ || 0 } @_;
}
{
use Imager;
my %colors;
my $img = Imager->new();
$img->open( file => $imagefile ) or die $img->errstr;
my ( $w, $h ) = ( $img->getwidth, $img->getheight );
for my $i ( 0 .. $w - 1 ) {
for my $j ( 0 .. $h - 1 ) {
my $color = $img->getpixel( x => $i, y => $j );
my $hcolor = rgba2hex $color->rgba();
print "$hcolor ";
$colors{$hcolor}++;
}
}
printf "Imager: Number of colours: %d\n", scalar keys %colors;
}
{
use GD;
my %colors;
my $gd = GD::Image->new($imagefile) or die
"GD::Image->new($imagefile)";
my ( $w, $h ) = $gd->getBounds();
for my $i ( 0 .. $w - 1 ) {
for my $j ( 0 .. $h - 1 ) {
my $index = $gd->getPixel( $i, $j );
my $hcolor = rgba2hex( $gd->rgb($index), 0 );
$colors{$hcolor}++;
}
}
printf "GD: Number of colours: %d\n", scalar keys %colors;
}
{
use Image::Magick;
my %colors;
my $img = Image::Magick->new();
my $rc = $img->Read($imagefile);
die $rc if $rc;
my ( $w, $h ) = $img->Get( 'width', 'height' );
for my $i ( 0 .. $w - 1 ) {
for my $j ( 0 .. $h - 1 ) {
my $color = $img->Get("pixel[$i,$j]");
my $hcolor = rgba2hex split /,/, $color;
$colors{$hcolor}++;
}
}
printf "Image::Magick: Number of colours: %d\n", scalar keys
%colors;
}
__END__
zentara
--
I'm not really a human, but I play one on earth.
http://zentara.net/japh.html
------------------------------
Date: Thu, 08 May 2008 13:31:25 +0200
From: Josef Moellers <josef.moellers@fujitsu-siemens.com>
Subject: Re: perl PNG image searching
Message-Id: <fvuo67$ct5$1@nntp.fujitsu-siemens.com>
elie wrote:
> Hello,
>
> so I have some images (all PNG)
>
> I have a small image, ( a checkered box) and other larger images that
> may or may not contain the checkered box small image.
> I want to somehow find out if the small image (the checkered box)
> apprears anywhere in the larger PNG's or not.
>
> any hits would be appreciated.
BTDT, however with a C program (I wanted to find the best fit for series
of screen shots of a game, so I could draw up a map of the game).
If you *must* use Perl, take a look at Image::Magick, more precise the
GetPixels method. I used it to to build an el-cheapo OCR program for
screen shots.
You can mail me for the sources. No problem.
Josef
--
These are my personal views and not those of Fujitsu Siemens Computers!
Josef Möllers (Pinguinpfleger bei FSC)
If failure had no penalty success would not be a prize (T. Pratchett)
Company Details: http://www.fujitsu-siemens.com/imprint.html
------------------------------
Date: Thu, 8 May 2008 03:50:52 -0700 (PDT)
From: "lovecreatesbea...@gmail.com" <lovecreatesbeauty@gmail.com>
Subject: Selected cipher type not supported by server
Message-Id: <67c34aa0-22de-40f9-858d-13d685ab6fb8@t12g2000prg.googlegroups.com>
Hi,
I'm getting "Selected cipher type not supported by server" error on
this line
$cnn = Net::SSH::Perl->new($host);
The error occurs even when I specify all IDEA, DES, DES3, Blowfish,
arcfour, blowfish-cbc, and 3des-cbc like this:
$cnn = Net::SSH::Perl->new($host, cipher => "IDEA");
in the following script. How can I correct this?
Thank you for your time.
#!/usr/bin/perl
use Net::SSH::Perl;
my ($host, $user, $pass, $mgrip, $rpwd, $prmpt, $tmout, $line);
$host = $ARGV[0];
$user = $ARGV[1];
$pass = $ARGV[2];
$mgrip = $ARGV[3];
$rpwd = $ARGV[4];
$prmpt = '/[\$%#>] ?$/';
$tmout = 2;
$cnn = Net::SSH::Perl->new($host);
$cnn->login($user, $pass);
#$cnn->print("/bin/su -");
#$cnn->waitfor('/password: ?$/i');
#$cnn->print($rpwd);
#$cnn->prompt('/# $/');
#$cnn->waitfor($cnn->prompt);
#@line = $cnn->cmd("/usr/sbin/dasnmp -a $mgrip");
@line = $cnn->cmd("ls /");
print "@line\n";
------------------------------
Date: Thu, 8 May 2008 16:19:39 +0200
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: Re: Selected cipher type not supported by server
Message-Id: <fvv98i.21g.1@news.isolution.nl>
lovecreatesbea...@gmail.com schreef:
> #!/usr/bin/perl
Missing:
use strict;
use warnings;
> use Net::SSH::Perl;
> my ($host, $user, $pass, $mgrip, $rpwd, $prmpt, $tmout, $line);
> $host = $ARGV[0];
> $user = $ARGV[1];
> $pass = $ARGV[2];
> $mgrip = $ARGV[3];
> $rpwd = $ARGV[4];
> $prmpt = '/[\$%#>] ?$/';
> $tmout = 2;
You can write that as:
my ($host, $user, $pass, $mgrip, $rpwd) = @ARGV;
my $prmpt = qr/[\$%#>] ?$/;
my $tmout = 2;
I don't see $prmpt nor $line used anywhere.
--
Affijn, Ruud
"Gewoon is een tijger."
------------------------------
Date: Thu, 8 May 2008 03:59:02 -0700 (PDT)
From: "lovecreatesbea...@gmail.com" <lovecreatesbeauty@gmail.com>
Subject: Re: Selected cipher type not supported by server
Message-Id: <17677fc6-77d5-4c67-aa0f-39e9e89f4d34@p25g2000pri.googlegroups.com>
On May 8, 6:50=A0pm, "lovecreatesbea...@gmail.com"
<lovecreatesbea...@gmail.com> wrote:
> Hi,
>
> I'm getting "Selected cipher type =A0not supported by server" error on
> this line
>
> =A0 =A0 $cnn =3D Net::SSH::Perl->new($host);
>
> The error occurs even when I specify all IDEA, DES, DES3, Blowfish,
> arcfour, blowfish-cbc, and 3des-cbc like this:
>
> =A0 =A0 $cnn =3D Net::SSH::Perl->new($host, cipher =3D> "IDEA");
>
> in the following script. How can I correct this?
>
> Thank you for your time.
>
> #!/usr/bin/perl
>
> use Net::SSH::Perl;
> my ($host, $user, $pass, $mgrip, $rpwd, $prmpt, $tmout, $line);
> $host =A0 =3D $ARGV[0];
> $user =A0 =3D $ARGV[1];
> $pass =A0 =3D $ARGV[2];
> $mgrip =A0=3D $ARGV[3];
> $rpwd =A0 =3D $ARGV[4];
> $prmpt =A0=3D '/[\$%#>] ?$/';
> $tmout =A0=3D 2;
>
> $cnn =3D Net::SSH::Perl->new($host);
> $cnn->login($user, $pass);
> #$cnn->print("/bin/su -");
> #$cnn->waitfor('/password: ?$/i');
> #$cnn->print($rpwd);
> #$cnn->prompt('/# $/');
> #$cnn->waitfor($cnn->prompt);
> #@line =3D $cnn->cmd("/usr/sbin/dasnmp -a $mgrip");
> @line =3D $cnn->cmd("ls /");
> print "@line\n";
And these commented lines,
#$cnn->print("/bin/su -");
#$cnn->waitfor('/password: ?$/i');
#$cnn->print($rpwd);
#$cnn->prompt('/# $/');
#$cnn->waitfor($cnn->prompt);
#@line =3D $cnn->cmd("/usr/sbin/dasnmp -a $mgrip");
I used them to perform su root when the cnn was an telnet connection.
The print, waitfor and prompt come from telnet can not be used in ssh
connection in my code.
How can I su root in ssh connection?
------------------------------
Date: Thu, 8 May 2008 06:43:30 -0700 (PDT)
From: Ronny <ro.naldfi.scher@gmail.com>
Subject: Re: state of Erlang?
Message-Id: <2af34e65-283d-45c1-8d52-fc0030b44e0f@f36g2000hsa.googlegroups.com>
On 7 Mai, 15:29, cartercc <carte...@gmail.com> wrote:
> Please excuse this OT post.
> Out of curiosity, I checked the job boards (Dice, etc.) for Erlang
> jobs, and there seemed to be precious few. Erlang dates from the same
> generation as Perl (mid 80s), and has strengths in concurrent,
> distributed, and multi-processor programming. It also had an
> impressive framework in the OTP.
But it had a completely different target audience - Perl was appealing
for people who want to "process text data in an easy way". I think
this
is an area where Perl (and Ruby, which I personally even prefer over
Perl)
shine.
As for Erlang, my impression is that it tries to appeal people doing
logic programming (i.e. Prolog) and functional programming (which
back then meant mostly Scheme or ML). I'm not an Erlang programmer,
but from what I have read, Erlang did not fully please these audiences
that much.
> So ... just wondering ... why isn't Erlang buzzing? Why does it seem
> so dead?
>
> Any thoughts on the state of Erlang from the Perl community?
Erlang was used for some time in the telecommunication field, at least
in Germany, and I think they used it for its logic features and that
you can easily write pure functions (i.e. without side effects). AFIK,
Erlang was dropped in favor of other languages in this area, but I
don't
know the reason. So just my personal guess here:
When the telecommunication people abandoned Erlang, one source of
continuing development disappeared. Of course the Functional
Programming
community was still interested in Erlang, and seemingly still is (for
instance, there will be an Erlang workshop at this years IFCP, see
http://www.erlang.org/), but in the FP field, Erlang seems to share
the
fate with other remarkable programming languages (such as Miranda);
maybe since the main effort in this field seems to focus on Haskell.
Any FP people hanging around to comment on this?
BTW, in same way one might ask why C++ had so much success and
Eiffel did not, or why nodbody is using the very elegant NIAL language
(http://www.nial.com/)...
Ronald
------------------------------
Date: Thu, 08 May 2008 03:25:54 -0700
From: usenet1.3.CalRobert@SpamGourmet.Com (Robert Maas, http://tinyurl.com/uh3t)
Subject: Re: The Importance of Terminology's Quality
Message-Id: <rem-2008may08-005@yahoo.com>
> From: "xah...@gmail.com" <xah...@gmail.com>
> the importance of naming of functions.
I agree, that's a useful consideration in the design of any system
based on keywords, such as names of functions or operators.
(I'm not using "keyword" in the sense of a symbol in the KEYWORD package.)
> the naming in Mathematica, as Stephen Wolfram implied in his blog
> above, takes the perspective of naming by capturing the essense, or
> mathematical essence, of the keyword in question.
For concepts adapted from mathematics, that naming meta-convention makes sense.
For concepts adapted from data-processing, it's not so clearly good.
> lambda, widely used as a keyword in functional languages, is
> named just Function in Mathematica.
That makes sense, but then what does Mathematica call the special
operator which Common Lisp calls Function? Or is that not provided,
and the programmer must case-by-case handcode what they really mean?
(function foo) == (symbol-function 'foo) ;so FUNCTION not really needed there
(function (lambda (x) (+ x y)) ;y is a lexical variable to be encapsulated
; into the resultant closure
How would you do something like that in mathematica?
> Module, Block, in Mathematica is in lisp's various let*
> The lisp's keywords let, is based on the English word let.
No, that's not correct. It's based on the mathematical use of "let":
Let R be the complete ordered field of real numbers.
Let S be the subset of R consisting of numbers which satisfy
equations expressed in transcendental functions with rational
parameters.
Prove that S is dense in R.
(Yeah, the question is trivial, but I'm just showing how "let" might be used.)
I see nothing wrong with LET used in that way in Lisp.
Bind would be good too.
I don't like Module or Block at all, because those words convey
nothing about binding some temporary local name to represent some
globally-definable concept, and they actually mis-lead because
module can mean either something like a vector space over a ring,
or a set of functions/methods that serve some small problem domain
within a larger library of functions/methods, or a set of lectures
on a single-topic within a curriculum, while Block sounds more like
just some random consecutive interval of statements rather having
nothing specific to do with bindings. TAGBODY or PROGN would be
more properly called Block perhaps.
> One easy way to confirm this, is taking a keyword and ask a wide
> audience, who doesn't know about the language or even unfamiliar of
> computer programing, to guess what it means.
That is a biassed question because the only options are the words
you choose in advance. Better would be to reverse the question: Ask
random people on the street what they would like to call these
concepts:
1 You set up a temporary relation between a name and some datum,
such that all references to that name give you that same datum.
For example you might set up the name 'n' to temporarily mean 5.
Fill in the missing word: (word (n 5) <say "ouch" n times>)
2 You set up a rule by which one step of data-processing is performed,
taking input to produce output. For example you set up a rule by
which the input value is divided by two if it's even but
multiplied by three and then 1 added if it was odd.
Fill in the missing word: (word (n) <if n even n/2 else 3*n+1>)
3 You set up a rule as above, but also give it a permanent name.
Fill in the missing word: (word collatz (n) <if n even n/2 else 3*n+1>)
4 You already have a rule that takes two input data and produces one output.
(oldword foo (x y) <absolute value of difference between x and y>)
You now know one of the two inputs, and that info won't change for a while,
and you hate to keep repeating it. So you want to define a new rule
that has that one known parameter built-in so that you only have
to say the *other* parameter each time you use the new rule.
Fill in the missing newword: (newword foo <x is fixed as 3>)
So I'd choose words: 1=let 2=lambda 3=defun 4=curry.
What words would a typical man on the street choose instead?
> The name regex has done major hidden damage to the computing industry
I have my own gripe against regular expressions ("regex" for short).
I hate the extremely terse format, with horrible concoctions of
escape and anti-escape magic characters, to fit within Unix's
255-character limit on command lines, compared to a nicely
s-expression nested notation that would be possible if regex hadn't
entrenched itself so solidly.
------------------------------
Date: Thu, 08 May 2008 06:52:22 -0400
From: Lew <lew@lewscanon.com>
Subject: Re: The Importance of Terminology's Quality
Message-Id: <oaGdnQFiu-v7Rr_VnZ2dnUVZ_qrinZ2d@comcast.com>
kodifik@eurogaran.com wrote:
>> | PLEASE DO NOT | :.:\:\:/:/:.:
>> | FEED THE TROLLS | :=.' - - '.=:
>
> I don't think Xah is trolling here (contrary to his/her habit)
> but posing an interesting matter of discussion.
Interesting is in the eye of the beholder. After you'd read the same recycled
crud from certain posters again and again, it because trollish spam.
--
Lew
------------------------------
Date: Thu, 08 May 2008 06:53:36 -0400
From: Lew <lew@lewscanon.com>
Subject: Re: The Importance of Terminology's Quality
Message-Id: <oaGdnQBiu-stRr_VnZ2dnUVZ_qrinZ2d@comcast.com>
Robert Maas, http://tinyurl.com/uh3t wrote:
> I have my own gripe against regular expressions ("regex" for short).
> I hate the extremely terse format, with horrible concoctions of
> escape and anti-escape magic characters, to fit within Unix's
> 255-character limit on command lines, compared to a nicely
> s-expression nested notation that would be possible if regex hadn't
> entrenched itself so solidly.
This is all very interesting, but not Java.
--
Lew
------------------------------
Date: Thu, 08 May 2008 11:08:35 -0400
From: Sherman Pendley <spamtrap@dot-app.org>
Subject: Re: The Importance of Terminology's Quality
Message-Id: <m17ie4ltos.fsf@dot-app.org>
kodifik@eurogaran.com writes:
>> | PLEASE DO NOT | :.:\:\:/:/:.:
>> | FEED THE TROLLS | :=.' - - '.=:
>
> I don't think Xah is trolling here (contrary to his/her habit)
> but posing an interesting matter of discussion.
It might be interesting in the abstract, but any such discussion, when
cross-posted to multiple language groups on usenet, will inevitably
devolve into a flamewar as proponents of the various languages argue
about which language better expresses the ideas being talked about.
It's like a law of usenet or something.
If Xah wanted an interesting discussion, he could have posted this to
one language-neutral group such as comp.programming. He doesn't want
that - he wants the multi-group flamefest.
sherm--
--
My blog: http://shermspace.blogspot.com
Cocoa programming in Perl: http://camelbones.sourceforge.net
------------------------------
Date: Thu, 8 May 2008 13:54:01 +0000 (UTC)
From: Ben Bullock <benkasminbullock@gmail.com>
Subject: Re: Using Win32::OLE('in')
Message-Id: <fvv0lp$d8s$1@ml.accsnet.ne.jp>
On Thu, 08 May 2008 02:39:54 +0000, Cosmic Cruizer wrote:
> Everyday I'm finding out more and more I can do with Win32::OLE(Â’inÂ’)
to
> help me manage and review remote servers. It's turning out to be a great
> tool to gather information for documentation and troubleshooting.
>
> With everything I've already done, I know there must be a huge number of
> other objects I don't even know exist. Is there somewhere online that
> lists all of the objects and gives a brief description on each one?
The documentation for whatever you're automating would be a good start.
------------------------------
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 1520
***************************************
