[23145] in Perl-Users-Digest
Perl-Users Digest, Issue: 5366 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Aug 15 11:05:38 2003
Date: Fri, 15 Aug 2003 08:05: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 Fri, 15 Aug 2003 Volume: 10 Number: 5366
Today's topics:
Re: Encrypting a superuser <simonis@myself.com>
Re: hand crafting soap for google api's (Tad McClellan)
Re: Help! Regular expression on html... <calle@lysator.liu.se>
Re: Help! Regular expression on html... <greving@gamic.com>
Re: Help! Regular expression on html... (Tad McClellan)
Re: Help! Regular expression on html... <paul@FAKEneave.com>
Re: how to autovivify a package from a string <usenet@expires082003.tinita.de>
Re: Installation of Perl/Tk on WindowsXP <hansstark165@compuserve.de>
Re: Installation of Perl/Tk on WindowsXP <simon.andrews@bbsrc.ac.uk>
MLDBM <greving@gamic.com>
Re: Please offer critique on my 2nd JAPH <REMOVEsdnCAPS@comcast.net>
Re: Please offer critique on my 2nd JAPH <uri@stemsystems.com>
Re: Please offer critique on my 2nd JAPH <spamblock@junkmail.com>
Re: Question about "eval" security nobull@mail.com
Re: Question about "eval" security <hisao@physics.purdue.edu>
Regex capture variable scoping (LBJ)
Re: Regex capture variable scoping <abigail@abigail.nl>
Re: Regex capture variable scoping <pinyaj@rpi.edu>
Search Engine help <no.name@eidosnet.co.uk>
Re: Search Engine help <boffin@fromru.com>
Re: soap, etc (Tad McClellan)
Re: soap, etc <uri@stemsystems.com>
Verifying Perl distribution (Jon)
Re: Verifying Perl distribution <greving@gamic.com>
Re: <bwalton@rochester.rr.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 15 Aug 2003 13:05:29 GMT
From: simonis <simonis@myself.com>
Subject: Re: Encrypting a superuser
Message-Id: <3F3CDA81.708B05F9@myself.com>
"JJ (UK)" wrote:
>
> Is it possible to specify a 'superuser' (Domain Admin) account name with the
> password encrypted within a Perl script in order to run a BATCH script with
> the required level of permissions?
>
While this problem has nothing really to do with Perl, it is so
worrying to me that you may consider implementing this in _any_
language that I am compelled to respond. Quite simply, I am sure
you can obfuscate, encrypt, or otherwise conceal the password within
the script. But, this ignores two issues.
For the password to become usable, it must be reversed into the normal
format. For the script to use this password, it must be capable of
performing this reversal. For a person with lower level permissions to
make use of this script, the file must be readable by that person.
So... You are essentially providing a simple puzzle for the script
user, one that, if solved, will yield a powerful prize.
Long story long, don't do. Find another way.
-Ds
------------------------------
Date: Fri, 15 Aug 2003 09:10:31 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: hand crafting soap for google api's
Message-Id: <slrnbjpqen.9fh.tadmc@magna.augustmail.com>
Hudson <scripts_you-know-the-drill_@hudsonscripting.com> wrote:
> On Thu, 14 Aug 2003 23:39:39 -0500, tadmc@augustmail.com (Tad
> McClellan) wrote:
>
>>Hudson <scripts_you-know-the-drill_@hudsonscripting.com> wrote:
>>
>>
>>> &print_prompt($query);
>>
>>
>> perldoc -q "&"
>>
>> What's the difference between calling a function as &foo and foo()?
>
> to tell you the truth, I really don't understand the cgi.pm and rather
> like doing it by hand, but this is old code from last month.
That's nice, but it has nothing to do with the text that you quoted.
I didn't say anything about CGI.pm or modules or even CGI programming.
You are calling your functions incorrectly.
>>You really need to learn about "here-doc"s, see perlop.pod.
> yes, but with the ".=" method, you get to see all your request on one
> page ;-)
Huh?
You can see _more_ of the string with a here-doc than with cat-equals,
so I dunno what you are talking about there...
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Fri, 15 Aug 2003 13:17:02 +0200
From: Calle Dybedahl <calle@lysator.liu.se>
Subject: Re: Help! Regular expression on html...
Message-Id: <864r0jb26p.fsf@ulthar.bisexualmenace.org>
>>>>> "Paul" == Paul Neave <paul@FAKEneave.com> writes:
> Hi group, Could someone help me with me regexp please?
> So that anything between the <a> tags gets stripped and replaced
> with (link).
A regexp is the wrong sort of hammer for that sort of screw. Try
something like this instead:
#!/usr/bin/perl
use strict;
use warnings;
use XML::LibXML;
my $parser = XML::LibXML->new;
foreach my $doc (@ARGV) {
my $tree = $parser->parse_html_file($doc);
my $root = $tree->getDocumentElement;
foreach my $link ($root->findnodes("//a")) {
$link->removeChildNodes;
$link->appendTextNode("(link)");
}
print $tree->toStringHTML;
}
--
Calle Dybedahl <calle@lysator.liu.se>
"I don't know what art these programs are state-of; possibly macrame."
-- Dr Richard A. O'Keefe, comp.risks
------------------------------
Date: Fri, 15 Aug 2003 16:10:18 +0200
From: Hendrik Greving <greving@gamic.com>
Subject: Re: Help! Regular expression on html...
Message-Id: <bhil4d$708$2@nets3.rz.RWTH-Aachen.DE>
Paul Neave wrote:
> Hi group,
> Could someone help me with me regexp please?
>
> I'd like to find all links in HTML like this:
>
> <a href="blahlink">some text here</a>
>
> and change it to:
>
> <a href="blahlink">(link)</a>
>
>
> So that anything between the <a> tags gets stripped and replaced
> with (link).
>
> Help!
> Many thanks,
> Paul.
try s.th. like this
s,(<\s?a\s{0,2}href=".*?"\s?>).*?(<\s?/a\s?>),$1(link)$3,i
greetings Hendrik Greving
------------------------------
Date: Fri, 15 Aug 2003 09:01:03 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Help! Regular expression on html...
Message-Id: <slrnbjppsu.9fh.tadmc@magna.augustmail.com>
Hendrik Greving <greving@gamic.com> wrote:
> Paul Neave wrote:
>> I'd like to find all links in HTML like this:
>>
>> <a href="blahlink">some text here</a>
>>
>> and change it to:
>>
>> <a href="blahlink">(link)</a>
> s,(<\s?a\s{0,2}href=".*?"\s?>).*?(<\s?/a\s?>),$1(link)$3,i
^^^ ^^^
If the data has a space there, then it is not an anchor tag.
> s,(<\s?a\s{0,2}href=".*?"\s?>).*?(<\s?/a\s?>),$1(link)$3,i
^^^^^^^
If it has zero spaces there, then it is not an anchor tag.
If it has 3 or more spaces there, then it _is_ an anchor tag.
> s,(<\s?a\s{0,2}href=".*?"\s?>).*?(<\s?/a\s?>),$1(link)$3,i
^^^
If it has more than one space there, then it is still an anchor tag.
This code will change things that should be left alone, and leave
alone things that should be changed. Not very satisfying...
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Fri, 15 Aug 2003 15:47:55 +0100
From: "Paul Neave" <paul@FAKEneave.com>
Subject: Re: Help! Regular expression on html...
Message-Id: <bhirrh$qe9$1@newsreader.mailgate.org>
Thanks guys. I know I should use the XML method, but I think I'll
stick to the regexp version for now.
Here's what I used, and I had to tweak it a bit:
s/(<\s?a\s{0,2}href=".*?"\s?>).*?(<\s?\/a\s?>)/$1(link)$2/ig;
When I took out the \s? parts, it fell over and wouldn't strip my
tags for some reason. Also, I used $2 not $3 and that fixed it.
The links are server-side generated, so they will always be well
formed anchor tags. I just needed another script to clean them up.
So should my version work OK?
Thanks,
Paul.
------------------------------
Date: 15 Aug 2003 10:32:58 GMT
From: Tina Mueller <usenet@expires082003.tinita.de>
Subject: Re: how to autovivify a package from a string
Message-Id: <bhicsq$105kc$1@ID-24002.news.uni-berlin.de>
David Baird wrote:
> I don't know anything about factories etc, but what I have is a
> template of code for a simple package, with a few tokens that I
> substitute in. In particular, I substitute in the package name, and an
> entry in the @ISA array, to build a hierarchy of classes. So the
> template is something like
> package <<PACKAGE_NAME>>;
[...]
ok, so apparently you already have the code, so
why bother with Class::MethodMaker. just replace your
<<PACKAGE_NAME>>-things and eval() the code. then don't
"use" it (because you can't 'use' a string), but import
it if there are any methods that are exported. then you can
just use the classes as you would do normally.
hth, tina
--
http://www.tinita.de/ \ enter__| |__the___ _ _ ___
http://Movies.tinita.de/ \ / _` / _ \/ _ \ '_(_-< of
http://www.perlquotes.de/ \ \ _,_\ __/\ __/_| /__/ perception
- my mail address expires end of august 2003 -
------------------------------
Date: Fri, 15 Aug 2003 13:47:22 +0200
From: Hans <hansstark165@compuserve.de>
Subject: Re: Installation of Perl/Tk on WindowsXP
Message-Id: <3F3CC84A.9090509@compuserve.de>
Thank you very much, the second advice worked at last.
Jack D. wrote:
>
>
> Use the perl package manager to install it. Ensure you are have access to the
> internet, then..
>
> Start->Run->"cmd"
>
> Type in:
> "ppm install Tk" {without the quotes}
That failed already. So I posted this question.
>
> Or you can directly download the zipped binaries from:
>
> http://ppm.activestate.com/PPMPackages/zips/6xx-builds-only/
Yes!! Here I found the Tk-Modul finally. Ufff (;~)
>
> ...and follow the README file to install using "ppm"
>
> Jack
>
>
------------------------------
Date: Fri, 15 Aug 2003 14:14:49 +0100
From: Simon Andrews <simon.andrews@bbsrc.ac.uk>
Subject: Re: Installation of Perl/Tk on WindowsXP
Message-Id: <3F3CDCC9.30204@bbsrc.ac.uk>
Hans wrote:
> Thank you very much, the second advice worked at last.
>
> Jack D. wrote:
>
>>
>>
>> Use the perl package manager to install it. Ensure you are have access
>> to the
>> internet, then..
>>
>> Start->Run->"cmd"
>>
>> Type in:
>> "ppm install Tk" {without the quotes}
>
> That failed already. So I posted this question.
If ppm fails it's nearly always because you access the internet via a
proxy, and ppm doesn't know about it. To fix this just add your
proxy information to your environment.
Right Click on "My Computer" and select Properties
Select the "Advanced" tab and press the "Environment Variables" button.
Press New:
The variable name is "http_proxy" and the value is the address and
port of your proxy server; eg "http://wwwcache.example.com:8080".
Open up a new command window and run ppm again and see if things
now work. If they don't then please post the error generated
by ppm.
PPM is just too useful a tool to not let it work!
Hope this helps
Simon.
------------------------------
Date: Fri, 15 Aug 2003 16:04:11 +0200
From: Hendrik Greving <greving@gamic.com>
Subject: MLDBM
Message-Id: <bhikou$708$1@nets3.rz.RWTH-Aachen.DE>
$global_tie_locker = tie (my
%safe_proc_valid,'MLDBM::Sync','../.global_settings',O_RDWR | O_CREAT,0666)
or die;
$global_tie_locker->Lock;
my $proc_valid_tied = {%safe_proc_valid};
my $proc_valid = $proc_valid_tied->{"proc_valid"};
delete $proc_valid->{$file};
untie(%safe_proc_valid);
$global_tie_locker->UnLock;
Hi,
I have a problem. The code above does not delete the key from the persistent
file. Whe I re-tie, the key is still there. What't wrong here, or is the
structure to deep (2) for dealing with MLDBM?
greetings Hendrik Greving
------------------------------
Date: Fri, 15 Aug 2003 05:05:35 -0500
From: "Eric J. Roode" <REMOVEsdnCAPS@comcast.net>
Subject: Re: Please offer critique on my 2nd JAPH
Message-Id: <Xns93D83DFCC1923sdn.comcast@206.127.4.25>
-----BEGIN xxx SIGNED MESSAGE-----
Hash: SHA1
Uri Guttman <uri@stemsystems.com> wrote in
news:x7vfszy306.fsf@mail.sysarch.com:
>>>>>> "DO" == David Oswald <spamblock@junkmail.com> writes:
>
> DO> Perhaps I should build the string up to bytes from a series of
> DO> bits, to avoid such a long literal, which contributed to the JAPH
> DO> exceeding the four line tradition.
>
> just don't get abigail started on that japh theme. she will fry your
> brane with her japh-fu. :)
"He". Abigail happens to be male. FYI.
- --
Eric
$_ = reverse sort $ /. r , qw p ekca lre uJ reh
ts p , map $ _. $ " , qw e p h tona e and print
-----BEGIN xxx SIGNATURE-----
Version: PGPfreeware 7.0.3 for non-commercial use <http://www.pgp.com>
iQA/AwUBPzywbmPeouIeTNHoEQJdAACdFdZVFLAVAiALytMIysXyGks3OzUAnA7b
x/4ZxCyoEh9+rVhfmCSsjpqj
=BioX
-----END PGP SIGNATURE-----
------------------------------
Date: Fri, 15 Aug 2003 14:16:05 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: Please offer critique on my 2nd JAPH
Message-Id: <x7wudfvwf9.fsf@mail.sysarch.com>
>>>>> "EJR" == Eric J Roode <REMOVEsdnCAPS@comcast.net> writes:
EJR> Uri Guttman <uri@stemsystems.com> wrote in
EJR> news:x7vfszy306.fsf@mail.sysarch.com:
>>>>>>> "DO" == David Oswald <spamblock@junkmail.com> writes:
>>
DO> Perhaps I should build the string up to bytes from a series of
DO> bits, to avoid such a long literal, which contributed to the JAPH
DO> exceeding the four line tradition.
>>
>> just don't get abigail started on that japh theme. she will fry your
>> brane with her japh-fu. :)
EJR> "He". Abigail happens to be male. FYI.
i know and know him/her as well. it is just easier to say her in this
group. :)
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: Fri, 15 Aug 2003 07:59:27 -0700
From: "David Oswald" <spamblock@junkmail.com>
Subject: Re: Please offer critique on my 2nd JAPH
Message-Id: <vjptios5fcuu5e@corp.supernews.com>
"Abigail" <abigail@abigail.nl> wrote in message
news:slrnbjp9p4.jtm.abigail@alexandra.abigail.nl...
> I haven't written a Japh in over 2 years. As for this particuliar
> Japh, I don't find it inspiring. It's in the class I call "data hiding",
> where the string 'Just another Perl Hacker' is encrypted, and a rather
> simple decryption technique is used to get the string back.
Your remark isn't the least bit insulting considering the source. And the
fact is that I didn't intend to wow anyone with the script, just learn a
little more about Perl, gain a little proficiency, and hear comments that
might inspire or direct further exploration.
------------------------------
Date: 15 Aug 2003 04:07:53 -0700
From: nobull@mail.com
Subject: Re: Question about "eval" security
Message-Id: <4dafc536.0308150307.a3079cd@posting.google.com>
Bart Lateur <bart.lateur@pandora.be> wrote in message news:<qfcojvksv256k3qpomf75mmsk3b1ap5pb8@4ax.com>...
> H. Nakanishi wrote:
>
> >Would something like:
> >
> >eval qq/"$userinput"/;
> >
> >work?
>
> Not if the input contains quotes.
That's why the standard way to write this is
chop( my $string = eval "<<end_of_data\n$userinput\nend_of_data\n");
This this technique is totally inappropriate if $userinput is ever
going to come from someone to whom you wouldn't grant the right to run
their own scripts. So for the OP it is useless.
It also fuzzes the line between data and program. This can be bad and
is something you shouldn't do without careful consideration. On the
other hand it's not nearly as bad as some people would have you
believe.
I've been trying to get this explaination into the FAQ for years. The
_question_ is in the FAQ but the current version of FAQ patronisingly
withholds the answer. So that when people "discover" it for themselves
as the OP did in this case:
1) They don't come up with the here-doc trick.
2) They are not alerted to the downsides.
3) They loose trust in the FAQ.
Worse still, the advice in the FAQ is "roll your own templating
system" without so much as a mention of the fact that there are one or
two templating systems out there already.
> >What I want is just to allow variable interpolation but not any
> >executions.
>
> Then perhaps String::Interpolate can be of use. See CPAN.
No, String::Interpolate is useful if you _do_ want to allow executions
but want to attempt to corral them a bit.
Note however that the security of String::Interpolate relies on Safe
and Safe is known to have security holes. String::Interpolate plugs
several of them but I (who wrote it) would not trust
String::Interpolate as protection against anything but a causual
attacker.
------------------------------
Date: Fri, 15 Aug 2003 09:55:37 -0500
From: "H. Nakanishi" <hisao@physics.purdue.edu>
Subject: Re: Question about "eval" security
Message-Id: <bhis8f$6g6$1@mozo.cc.purdue.edu>
> H> Thanks to Randal and Richard for their help. I will use:
> H> $userinput =~ s/\$(\w+)/${$1}/g;
>
> H> instead. Are there any problems with this?
>
> Yes, don't use soft references! Don't mix user data with program
> data.
I see that in principle one shouldn't mix user data with program data.
However, I don't see any danger as long as only certain variable names
have values assigned to them within the subprogram where this statement
will be used. The question was whether any command would be executed
if $userinput contained one. Would it be?
> Create a hash %vars, and populate it with your user data. Then use:
>
> $userinput =~ s/\$(\w+)/$vars{$1}/g;
I ended up doing this, which is indeed cleaner in terms of separating
user data and program data. So thanks for this, Richard and Randal.
The reason for initially resisting this was because the actual variables
which I would like to use assigned values for in $userinput are only
dynamically determined (from other program data, but only at run time)
and thus I thought constructing my(%var) might be difficult. It wasn't.
So that is a moot point now.
I thank all who took interest in my original question. Since I did end up,
I think, with a safer and cleaner code as a result of posting the question,
I am glad I did it. However, I must say that some posters, while
ultimately being helpful, have ways of exuding a sense of "holier than
thou".
H. Nakanishi
------------------------------
Date: 15 Aug 2003 06:36:01 -0700
From: lbjay@reallywow.com (LBJ)
Subject: Regex capture variable scoping
Message-Id: <8ceedd53.0308150536.400719a2@posting.google.com>
Can someone please help me understand what I'm seeing as a
contradiction between a statement in the perlre man page and a bug in
a script that just bit me in the a**?
From perlre:
"The numbered variables ($1, $2, $3, etc.) and the related
punctuation set ($+, $&, $`, and $') are all dynamically
scoped until the end of the enclosing block or until the
next successful match, whichever comes first."
And here's the code in question:
# looping through a fairly standard apache log
while (<LOGFILE>)
{
# grab the datestamp and querystring
m/\s\[([^\s]+) \-\d+\] "[A-Z]+ [^\?\s]+\?([^\s]+)/;
my ($date, $querystring) = ($1, $2);
if ($querystring)
{
....
}
}
The "bug" here is that $2 seems to not get unset for each iteration of
the while loop. When the loop gets to a line that doesn't match a
querystring value, $querystring is getting assigned the value of the
previous line's $2 capture buffer.
I've always been under the impression that the capture buffers got
unset with each subsequent regular expression, regardless of success
or failure. If that's not true, I still don't underdstand how this
gels with the statement in the perlre man page about the special
variables being dynamically scoped until the end of the block.
Thanks,
Jay L.
------------------------------
Date: 15 Aug 2003 13:58:23 GMT
From: Abigail <abigail@abigail.nl>
Subject: Re: Regex capture variable scoping
Message-Id: <slrnbjppnu.8pc.abigail@alexandra.abigail.nl>
LBJ (lbjay@reallywow.com) wrote on MMMDCXXXVI September MCMXCIII in
<URL:news:8ceedd53.0308150536.400719a2@posting.google.com>:
:)
:) I've always been under the impression that the capture buffers got
:) unset with each subsequent regular expression, regardless of success
:) or failure. If that's not true, I still don't underdstand how this
:) gels with the statement in the perlre man page about the special
:) variables being dynamically scoped until the end of the block.
$1 and friends are never changed if a match fails - they remain their
old value. What perlre means with dynamic scoping is that if you
have:
{
m/... (...) .../; # Success.
my $save = $1;
{
m/... (...) .../;
}
$save eq $1;
}
After exiting the inner block, $1 will have the same value as before
entering the inner block - regardless whether the match in the inner
block succeeds or not.
$ perl -wle '"a" =~ /(.)/; {"b" =~ /(.)/; print $1} print $1'
b
a
Abigail
--
#!/opt/perl/bin/perl -- # No trailing newline after the last line!
BEGIN{$|=$SIG{__WARN__}=sub{$_=$_[0];y-_- -;print/(.)"$/;seek _,-open(_
,"+<$0"),2;truncate _,tell _;close _;exec$0}}//rekcaH_lreP_rehtona_tsuJ
------------------------------
Date: Fri, 15 Aug 2003 10:13:28 -0400
From: Jeff 'japhy' Pinyan <pinyaj@rpi.edu>
To: LBJ <lbjay@reallywow.com>
Subject: Re: Regex capture variable scoping
Message-Id: <Pine.SGI.3.96.1030815101034.157679A-100000@vcmr-64.server.rpi.edu>
[posted & mailed]
On 15 Aug 2003, LBJ wrote:
>Can someone please help me understand what I'm seeing as a
>contradiction between a statement in the perlre man page and a bug in
>a script that just bit me in the a**?
I agree the documentation is misleading.
>"The numbered variables ($1, $2, $3, etc.) and the related
>punctuation set ($+, $&, $`, and $') are all dynamically
>scoped until the end of the enclosing block or until the
>next successful match, whichever comes first."
One thinks, then, that it is like saying:
while (<FOO>) {
local $something;
if (...) { $something = 1 }
print "s = $something\n";
}
However, the $DIGIT variables actually work this way:
{
# they start with their initial value
# and are scoped to JUST AROUND the block
local $something = $something;
while (<FOO>) {
if (...) { $something = 1 }
print "s = $something\n";
}
}
Compounded to that is the fact that $DIGIT variables are not reset to
undef on a failed match, and you have a sticky situation, admittedly.
But the docs could use some fixing.
--
Jeff Pinyan RPI Acacia Brother #734 2003 Rush Chairman
"And I vos head of Gestapo for ten | Michael Palin (as Heinrich Bimmler)
years. Ah! Five years! Nein! No! | in: The North Minehead Bye-Election
Oh. Was NOT head of Gestapo AT ALL!" | (Monty Python's Flying Circus)
------------------------------
Date: Fri, 15 Aug 2003 20:32:44 +0100
From: "No Name" <no.name@eidosnet.co.uk>
Subject: Search Engine help
Message-Id: <3f3cc7ad$0$10767$afc38c87@news.eidosnet.co.uk>
Hi,
I am currently constructing a small search facility in perl for a website i
am creating, and have become quite confused on a couple of things.
the datafile will be something like below;
Name|Area|Website|etc...
My main confusion is when a user does a search and i wish to display the
results to the user, i take it that i need to create a temporary page, so
how do i create a temporary page to display the results in (when creating
the temporary page how do i ensure that another user searching doesn't get
the same temporary file as another user that is currently searching) and
clear it up when the user closes his browser or leaves the site?
Hope i explained my self well enough :)
Thanks for your time and patience.
N.Name
---
This e-mail has been virus scanned and is certified virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.502 / Virus Database: 300 - Release Date: 7/18/03
------------------------------
Date: Fri, 15 Aug 2003 17:06:52 +0200
From: "Evgeny Trifuntov" <boffin@fromru.com>
Subject: Re: Search Engine help
Message-Id: <bhipf7$dr0$1@news2.netvision.net.il>
PiBNeSBtYWluIGNvbmZ1c2lvbiBpcyB3aGVuIGEgdXNlciBkb2VzIGEgc2VhcmNoIGFuZCBpIHdp
c2ggdG8gZGlzcGxheSB0aGUNCj4gcmVzdWx0cyB0byB0aGUgdXNlciwgaSB0YWtlIGl0IHRoYXQg
aSBuZWVkIHRvIGNyZWF0ZSBhIHRlbXBvcmFyeSBwYWdlLCBzbw0KPiBob3cgZG8gaSBjcmVhdGUg
YSB0ZW1wb3JhcnkgcGFnZSB0byBkaXNwbGF5IHRoZSByZXN1bHRzIGluICh3aGVuIGNyZWF0aW5n
DQo+IHRoZSB0ZW1wb3JhcnkgcGFnZSBob3cgZG8gaSBlbnN1cmUgdGhhdCBhbm90aGVyIHVzZXIg
c2VhcmNoaW5nIGRvZXNuJ3QgZ2V0DQo+IHRoZSBzYW1lIHRlbXBvcmFyeSBmaWxlIGFzIGFub3Ro
ZXIgdXNlciB0aGF0IGlzIGN1cnJlbnRseSBzZWFyY2hpbmcpIGFuZA0KPiBjbGVhciBpdCB1cCB3
aGVuIHRoZSB1c2VyIGNsb3NlcyBoaXMgYnJvd3NlciBvciBsZWF2ZXMgdGhlIHNpdGU/DQoNCkhl
bGxvLg0KQmVmb3JlIHlvdSB3YW50IGRpc3BsYXkgcmVzdWx0cyB0byB1c2VyIGluc2VydCBpbiB5
b3VyIHByb2dyYW0gc3RyaW5nIGxpa2U6DQoNCnByaW50ICJDb250ZW50LXR5cGUgdGV4dC9odG1s
XG5cbiI7ICAgICAjVGhpcyBpcyBqdXN0IHN0YW5kYXJ0IGhlYWRlciBzdHJpbmcNCg0KQW5kIHRo
ZW4geW91IGNhbiBwcmludCBhbnl0aGluZyB5b3Ugd2FudCBqdXN0IGxpa2Ugc2ltcGxlIGh0bWwg
cGFnZS4gDQpVc2VyIHdpbGwgZ2V0IHRoaXMgcGFnZSB0aGF0IHlvdSd2ZSBwcmludGVkIGluIHlv
dXIgcHJvZ3JhbS4NCg0KLS0gDQpCb2ZmaW4NCm1haWx0bzpib2ZmaW5AZnJvbXJ1LmNvbQ0KSUNR
OiA5NDQ2Njc4Mg==
------------------------------
Date: Fri, 15 Aug 2003 09:07:49 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: soap, etc
Message-Id: <slrnbjpq9l.9fh.tadmc@magna.augustmail.com>
Hudson <scripts_you-know-the-drill_@hudsonscripting.com> wrote:
> I think it is a bad habit the perl community has of doing everything
> through modules,
It is clear that you have not had formal education in programming.
Code reuse is a *good* thing.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Fri, 15 Aug 2003 14:20:51 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: soap, etc
Message-Id: <x7u18jvw9e.fsf@mail.sysarch.com>
>>>>> "H" == Hudson <scripts_you-know-the-drill_@hudsonscripting.com> writes:
H> I think it is a bad habit the perl community has of doing everything
H> through modules, etc...of course, I got no clue as to writing a socket
H> in C, so maybe I shouldn't complain.
and you would cut and paste everything? and get rid of cpan? and
reinvent each wheel? search google for moronzilla and her blatherings on
why modules are bad (and see her turn around and use them anyway).
if you keep making dumb statements like that, you won't get far in the
programming world.
as for sockets in perl, read the book network programming in
perl. sockets are easy even at low level and even easier with those
dreaded modules.
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: 15 Aug 2003 05:25:32 -0700
From: jon18_uk2002@yahoo.co.uk (Jon)
Subject: Verifying Perl distribution
Message-Id: <83bd902f.0308150425.78c50c5e@posting.google.com>
Up to now I have simply used the RedHat supplied RPM for Perl,
however, I am now going to build my own, as some of the compile time
options I need are not used in the RPM.
I downloaded the source code from CPAN, but it seems there is no way
to verify the source using md5sum or GPG key. Just wondering if
anyone can provide the md5sum of a clean stable.tar.gz Perl 5.8.0 for
Unix.
Thanks,
Jon.
------------------------------
Date: Fri, 15 Aug 2003 16:11:34 +0200
From: Hendrik Greving <greving@gamic.com>
Subject: Re: Verifying Perl distribution
Message-Id: <bhil6p$708$3@nets3.rz.RWTH-Aachen.DE>
Jon wrote:
> Up to now I have simply used the RedHat supplied RPM for Perl,
> however, I am now going to build my own, as some of the compile time
> options I need are not used in the RPM.
>
> I downloaded the source code from CPAN, but it seems there is no way
> to verify the source using md5sum or GPG key. Just wondering if
> anyone can provide the md5sum of a clean stable.tar.gz Perl 5.8.0 for
> Unix.
>
> Thanks,
>
> Jon.
d9bdb180620306023fd35901a2878b62 is the md5sum on my machine for
stable.tar.gz 5.8.0
greetings Hendrik Greving
------------------------------
Date: Sat, 19 Jul 2003 01:59:56 GMT
From: Bob Walton <bwalton@rochester.rr.com>
Subject: Re:
Message-Id: <3F18A600.3040306@rochester.rr.com>
Ron wrote:
> Tried this code get a server 500 error.
>
> Anyone know what's wrong with it?
>
> if $DayName eq "Select a Day" or $RouteName eq "Select A Route") {
(---^
> dienice("Please use the back button on your browser to fill out the Day
> & Route fields.");
> }
...
> Ron
...
--
Bob Walton
------------------------------
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.
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 5366
***************************************
