[24843] in Perl-Users-Digest
Perl-Users Digest, Issue: 6994 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Sep 11 21:06:30 2004
Date: Sat, 11 Sep 2004 18:05:05 -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 Sat, 11 Sep 2004 Volume: 10 Number: 6994
Today's topics:
Re: $| (undocumented) magic? <bik.mido@tiscalinet.it>
Re: better way to parse html <noemail@#$&&!.net>
Re: better way to parse html <noemail@#$&&!.net>
Re: better way to parse html <tadmc@augustmail.com>
Re: Building Hierarchical Class Tree from custom Script <rossjeff@yahoo.com>
Re: command line search and replace dilemma <uri@stemsystems.com>
Re: Name of variable is value of other variable <nobull@mail.com>
Re: Name of variable is value of other variable <uri@stemsystems.com>
Re: Name of variable is value of other variable (Bart Van der Donck)
Re: Name of variable is value of other variable <uri@stemsystems.com>
Newbie, how di I change variables for mysite??? (javatiger)
Re: Newbie, how di I change variables for mysite??? <sbryce@scottbryce.com>
Perl opting for double-byte chars? <http://joecosby.com/code/mail.pl>
Re: strange output of pack in perl 5.8.0 <bgeer@xmission.com>
use CGI qw(:standard) ??? (javatiger)
Re: use CGI qw(:standard) ??? <ebohlman@omsdev.com>
Re: use CGI qw(:standard) ??? <sbryce@scottbryce.com>
Re: Xah Lee's Unixism <krw@att.bizzzz>
Re: Xah Lee's Unixism <krw@att.bizzzz>
Re: Xah Lee's Unixism <peacock@simconv.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sat, 11 Sep 2004 22:56:25 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: $| (undocumented) magic?
Message-Id: <jap6k0topr7kquege7go0enho2dcnr3d5g@4ax.com>
On Sat, 11 Sep 2004 09:53:04 -0400, Jeff 'japhy' Pinyan
<pinyaj@rpi.edu> wrote:
>>>The C code implementing $| basically says "if the value assigned to $| is
>>>true, have $| return 1, otherwise have it return 0". This leads to the
>>
>>(Having not seen the actual code, and not being to) I *think* that
>>basically it should say "if the result of an assignment is true then
>>actually store 1 in it, otherwise store 0 in it". Isn't this closer?
>>Thank you for the kind explanation, anyway...
>
>Nothing is ever "stored" in $|, just like nothing is ever "stored" in a
>tied variable. $| is like a tied variable, but on an internal level.
>When you set $| to a true value, the internals turn off buffering for the
>currently selected filehandle, and when you read $|'s value, Perl checks
>to see if the currently selected filehandle has buffering on or off. $|
>is just a placeholder.
I don't want to argue on this particular topic, especially since I
guess we both know what we're talking about, and I'm still thanking
you for your knowledgeable explanation. However it's obvious that even
if technically "nothing is ever stored" in $|, it maintains a
knowledge of its current status, which is what I meant...
Respectfully thanking you once again,
Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
.'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
Date: Sat, 11 Sep 2004 16:07:54 -0500
From: Fred <noemail@#$&&!.net>
Subject: Re: better way to parse html
Message-Id: <pan.2004.09.11.21.07.54.319528@#$&&!.net>
On Fri, 10 Sep 2004 23:07:29 -0500, Tad McClellan wrote:
> foreach my $i ( 0 .. $#array ) # much easier to understand
I heard at the poker table that foreach's were costly in CPU cycles... I
always wondered if that was true or not. I guess it wouldn't be much of a
project to test it but I never have.
------------------------------
Date: Sat, 11 Sep 2004 16:25:41 -0500
From: Fred <noemail@#$&&!.net>
Subject: Re: better way to parse html
Message-Id: <pan.2004.09.11.21.25.40.391217@#$&&!.net>
On Sat, 11 Sep 2004 04:37:41 +0200, Gunnar Hjalmarsson wrote:
> Fred wrote:
>> I am using this code to impersonate a browser, grab a page and
>> return only the data elements I want, namely the ozone level. I
>> would like to entertain any comments about style, and in particular
>> what the heck this line does:
>> $list[2] =~ s/<(?:[^>'"]*|(['"]).*?\1)*>//gs;
>> because it is really past my understanding, I got it from the FAQ's
>
> It removes HTML tags. :) It's a more complicated way of doing:
>
> $list[2] =~ s/<[^>]*>//g;
>
> but unlike the latter, the FAQ regex is not broken because of
> attributes such as:
>
> value="<me@example.com>"
I could dig:
$list[2] =~ s/<[^>]*>//g;
but:
$list[2] =~ s/<(?:[^>'"]*|(['"]).*?\1)*>//gs;
OK all the rocket scientist please weigh in.... is this from the FAQ?(yes)
was it an entry to the obfuscated perl contest? (No) Tad spelled it out
and I am still am studying it. I'll say this, if "they" taught perl in
school as the FIRST programming language, giving an emphasis on regular
expressions, it might end the outsourcing of jobs to India IMHO
FYI and Thanks
------------------------------
Date: Sat, 11 Sep 2004 20:00:59 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: better way to parse html
Message-Id: <slrnck77ub.e43.tadmc@magna.augustmail.com>
Fred <noemail@#$&&!.net> wrote:
> On Sat, 11 Sep 2004 04:37:41 +0200, Gunnar Hjalmarsson wrote:
>> Fred wrote:
>>> what the heck this line does:
>>> $list[2] =~ s/<(?:[^>'"]*|(['"]).*?\1)*>//gs;
>>> because it is really past my understanding, I got it from the FAQ's
> I could dig:
> $list[2] =~ s/<[^>]*>//g;
So, you would be tempted to use that one then, eh?
(is that what the FAQ author wants you to use?)
> but:
> $list[2] =~ s/<(?:[^>'"]*|(['"]).*?\1)*>//gs;
>
> OK all the rocket scientist please weigh in.... is this from the FAQ?(yes)
> was it an entry to the obfuscated perl contest? (No)
Your reaction seems to be "that is too scary to use" then, eh?
> I'll say this, if "they" taught perl in
> school as the FIRST programming language, giving an emphasis on regular
> expressions, it might end the outsourcing of jobs to India IMHO
If that hairy regex makes you want to do something else, then
maybe you would go back to the 1st sentence in the FAQ answer?
The most correct way ... is to use HTML::Parser
They are not trying to teach you Perl. They are trying to teach
the futility of "parsing" HTML with regexes.
Scaring you into the right direction is very likely a Good Thing,
it will save you from spending time proving the futility for yourself. :-)
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Sat, 11 Sep 2004 13:33:20 -0700
From: Jeff Ross <rossjeff@yahoo.com>
Subject: Re: Building Hierarchical Class Tree from custom Scripting Language
Message-Id: <j6o6k0d8rolt6d2vto6pln1dv7g8kn3riu@4ax.com>
Thanks for the pointer. It worked perfectly...Now I just need to
explore the intricacies of GraphViz so I can properly output and
visualize my hierarchy of over 400 classes.
On 10 Sep 2004 04:37:55 GMT, Sam Holden
<sholden@flexal.cs.usyd.edu.au> wrote:
>On Thu, 09 Sep 2004 21:05:37 -0700, Jeff Ross <rossjeff@yahoo.com> wrote:
>> At work I'm using a custom game scripting language, and it's gotten to
>> be quite bloated. It's fairly similar to Java in that it supports a
>> lot of class extension.
>>
>> What I've done so far with Perl is traverse the game tree, found all
>> the script files, parsed the necessary lines, and now I have an array
>> that contains hundreds of elements similar to this:
>>
>> "Class WeaponBaseClass ExtendsFrom GameObject"
>> "Class StreetLamp ExtendsFrom LightCastera"
>> "Class AssaultRifle ExtendsFrom WeaponBaseClass"
>> "Class MoneyClip ExtendsFrom InventoryManager"
>> "Class GameObject ExtendsFrom BaseGOBJ"
>> "Class Hud ExtendsFrom RenderMan"
>>
>> and so on...
>>
>> Unfortunately, these aren't in any real order..
>>
>> Since my intention is to thoroughly understand this spaghetti code
>> system, or at the very least be able to step through the hierarchy
>> more easily, I would like to find a solution that clearly displays the
>> parent/child relationships.
>>
>> I've staged the data so I can easily prepare it for whatever tool or
>> method I wind up using. Of course it would be ideal to build a UML or
>> other hyperlinkable visual system.
>>
>> Any suggestions?
>
>
>GraphViz makes reasonable "hierarchical" graph layouts which are a good
>fit for inheritance heirarchies (strangely enough :). There's a perl
>module on cpan "GraphViz" for ease of use from perl. You would simply
>turn each of those string into an edge in the graph and display it:
>
>@data = ("Class WeaponBaseClass ExtendsFrom GameObject",
> "Class StreetLamp ExtendsFrom LightCastera",
> "Class AssaultRifle ExtendsFrom WeaponBaseClass",
> "Class MoneyClip ExtendsFrom InventoryManager",
> "Class GameObject ExtendsFrom BaseGOBJ",
> "Class Hud ExtendsFrom RenderMan",
>);
>
>use GraphViz;
>my $g = GraphViz->new();
>for (@data) {
> if (/^Class (\S+) ExtendsFrom (\S+)$/) {
> $g->add_edge($2, $1);
> } else {
> warn "Unprocessed item: $_\n";
> }
>}
>print $g->as_ps();
>
>And pipe the output to a postscript viewer or to a file. Other output
>formats are supported if you don't do postscript.
>
>If there's a viewer you like for some other language, you could also
>just munge the text into something syntatically correct (but
>meaningless) for that language - with the appropriate names - and use
>that viewer.
------------------------------
Date: Sat, 11 Sep 2004 20:01:23 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: command line search and replace dilemma
Message-Id: <x7r7p8wp7m.fsf@mail.sysarch.com>
>>>>> "MS" == Michael Slass <miknrene@drizzle.com> writes:
MS> 1) My version of perl won't accept the -i switch unless I provide an
MS> extension for a backup file like -i.bak
huh? all versions of perl can do -i without backups. i wager you don't
know the proper option syntax. you have to use -i by itself with no text
immediately following it. that will do inline edit and not leave a
backup.
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: Sat, 11 Sep 2004 20:28:36 +0100
From: Brian McCauley <nobull@mail.com>
Subject: Re: Name of variable is value of other variable
Message-Id: <chvjd4$sj4$1@sun3.bham.ac.uk>
Uri Guttman wrote:
>>>>>>"BM" == Brian McCauley <nobull@mail.com> writes:
>
>
> BM> Bart Van der Donck wrote:
>
> >> Tad wrote:
> >>
> >>> If you _did_ want to use a symbolic reference (but you don't!),
> >>> then it would be:
> >>> $myvar = $$pp;
> >>
> >> Despite your advice, I 'm gonna take my chances on $$pp. I believe
> >> this is most suited to what I 'm up to (my initial code was only a
> >> simplification).
>
> BM> Unlike Tad and Uri I am not fanatically opposed to symrefs (and/or
> BM> eval). There are cases where the convienence is worth the hazards
> BM> implicit in using such a powerfull and hard to control tools.
>
> i would like to see such a case where the goal is not to mung the symbol
> table and is only for data structure purposes.
OK, there aren't any. I was just trying to con the OP into doing the
right thing. :-)
Well that's not entirely true. I tend to think of symrefs and
eval(STRING) togeter and I was really thinking of eval.
I can't honestly recall the last time I ever used or suggested anyone
else should use a symref other than a CODEref of a GLOBref.
> BM> If you won't accept the advice not to use symrefs from people who
> BM> always advise against symrefs then please accept the advice of
> BM> someone who doesn't always advise against symrefs. Don't do it.
>
> so when do you advise their use?
The only time I ever suggest use of symrefs is other than for doing
AUTOLOAD/import stuff is that there are some cases where using a Perl
package (special hash) as a dispatch table can aid readability. Indeed
Perl does this itself in its implementation of OO.
> and i hope we haven't lost this newbie to the 7th hells of symrefs. :)
I hope so too.
------------------------------
Date: Sat, 11 Sep 2004 19:59:03 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: Name of variable is value of other variable
Message-Id: <x7u0u4wpbi.fsf@mail.sysarch.com>
>>>>> "BM" == Brian McCauley <nobull@mail.com> writes:
BM> OK, there aren't any. I was just trying to con the OP into doing the
BM> right thing. :-)
ignore the man behind the curtain! :)
BM> Well that's not entirely true. I tend to think of symrefs and
BM> eval(STRING) togeter and I was really thinking of eval.
well, i think of them as very separate things though you can do the
equiv of symrefs with eval. i use string eval for code generation (see
Sort::Maker for a load of that) and for other rarities like
'use/require' at runtime without having to mung module names ( s{::}{/}g
kinda stuff).
>> so when do you advise their use?
BM> The only time I ever suggest use of symrefs is other than for doing
BM> AUTOLOAD/import stuff is that there are some cases where using a Perl
BM> package (special hash) as a dispatch table can aid readability.
BM> Indeed Perl does this itself in its implementation of OO.
even for dispatch tables i prefer a regular hash. checking for existance
is cleaner than looking in the symbol table. unless code is written
always expecting those subs to be there, i would stay away from
exporting dispatch subs.
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: 11 Sep 2004 13:25:50 -0700
From: bart@nijlen.com (Bart Van der Donck)
Subject: Re: Name of variable is value of other variable
Message-Id: <b5884818.0409111225.3b8fc362@posting.google.com>
Uri wrote:
> [..]
> maybe this will convince you. do you realize that using symrefs is just
> using the symbol table as a hash tree? and that the symbol table is just
> a hash with special side effects? so using a regular hash is safer,
> simpler, more flexible (you can have lexical hashes, assign anything to
> any slot), handle references better, etc.
I have done further study and come to the same conclusion, yes.
Esp the links of a previous poster:
http://perl.plover.com/varvarname.html
http://perl.plover.com/varvarname2.html
http://perl.plover.com/varvarname3.html
Excellent article, clear style
> [..]
> it is NOT simpler however much your brain says it is.
Symrefs are new for me. They seemed suitable at first sight for what I
wanted to do. After studying, one must conclude they are simply too
dangerous to use in production environment.
it's a trap! AAAARRGHHH!!! :-)
Bart
------------------------------
Date: Sat, 11 Sep 2004 21:03:29 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: Name of variable is value of other variable
Message-Id: <x7sm9ov7ro.fsf@mail.sysarch.com>
>>>>> "BVdD" == Bart Van der Donck <bart@nijlen.com> writes:
BVdD> Esp the links of a previous poster:
BVdD> http://perl.plover.com/varvarname.html
BVdD> http://perl.plover.com/varvarname2.html
BVdD> http://perl.plover.com/varvarname3.html
BVdD> Excellent article, clear style
those are good which is why we point newbies to them all the time. did
you think you were the first one ever to try symrefs and be told they
are evil? :)
BVdD> Symrefs are new for me. They seemed suitable at first sight for
BVdD> what I wanted to do. After studying, one must conclude they are
BVdD> simply too dangerous to use in production environment.
BVdD> it's a trap! AAAARRGHHH!!! :-)
yep and at least you finally listened and read up and learned. let this
be a lesson to other newbies who get seduced by the sirens of
symrefs. :)
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: 11 Sep 2004 16:16:02 -0700
From: tigermott@yahoo.com (javatiger)
Subject: Newbie, how di I change variables for mysite???
Message-Id: <962e2a34.0409111516.11eec137@posting.google.com>
I have downloaded a few scripts and I'm not sure about how to change
them to suit my site.
Below is part of a perl script I have downloaded, now I need to
personlize them for my site.
My site = http://happydrink.shyper.com
I have put a simple clock on it if it helps with my answer
http://happydrink.shyper.com/cgi-bin/textclock.pl
On my server we use the public_html folder only and not the www folder
I have created a new folder in the public_html called perltest and
uploaded the htm files into hear, I have put the perl script in my
cgi_bin.
Can someone post a reply editing the script below to suit my site.
Also I see /usr/ in alot of scripts what does it mean?
--------------------------------------------------------------------------------
#*******Variables that need to be personalized***********
$answerFile = "/usr/www/users/mhughes/perltest/answers.txt";
$logFile = "/usr/www/users/mhughes/perltest/testlog.htm";
$logFileUrl =
"http://www.flashlightbrown.com/perltest/testlog.htm";
$testUrl = "http://www.flashlightbrown.com/perltest/test.htm";
$graphFile = "/usr/www/users/mhughes/perltest/graphlog.htm";
$graphFileUrl =
"http://www.flashlightbrown.com/perltest/graphlog.htm";
---------------------------------------------------------------------------------
------------------------------
Date: Sat, 11 Sep 2004 17:32:34 -0600
From: Scott Bryce <sbryce@scottbryce.com>
Subject: Re: Newbie, how di I change variables for mysite???
Message-Id: <10k72ogm1rn5qc9@corp.supernews.com>
javatiger wrote:
> I have downloaded a few scripts and I'm not sure about how to change
> them to suit my site.
This is not a Perl question. It is a server configuratrion question. You
will need to ask your web host.
------------------------------
Date: Sat, 11 Sep 2004 17:38:35 -0700
From: Bëelphazoar <http://joecosby.com/code/mail.pl>
Subject: Perl opting for double-byte chars?
Message-Id: <9i57k0hfs4ov5orh4cji217f55icn6lnrq@4ax.com>
I am working on a problem, I have text in a database which includes
the word "más". The "á" is ASCII value 225/E1 .
It is definitely this inside the database.
The code pulls the text out of the database and assigns it to a
variable, but when I print the variable it is now "más", the "á" has
been replaced by C3A1 .
I am PRETTY sure that this is not happening within the code I am
working on, if I am following the code flow correctly it looks like it
does nothing but pull the text from the database and pass it back.
Digging around in various Perl docs, I found some references which say
that Perl will decide whether to use double-byte for chars > 127, it
looks like that is what's happening here.
I tried doing this:
use bytes;
$myVar = pullTextFromDb();
no bytes;
but I still got the double-byte translation.
Does anybody have any pointers about how to proceed further debugging
this?
Should the use bytes pragram affect code that is not in the current
module? That is, the pullTextFromDb() function call goes through
several modules object-oriented style, should the pragma still be in
effect for that code, or is it only useful in the current module?
Thanks for any help.
--
Joe Cosby
http://joecosby.com/
IT'S THE DARK ANGEL OF MACARONI! COMING TO GET ME! COMING TO
FEED ME MACARONI!
------------------------------
Date: Sat, 11 Sep 2004 21:43:45 +0000 (UTC)
From: bgeer <bgeer@xmission.com>
Subject: Re: strange output of pack in perl 5.8.0
Message-Id: <chvrih$dck$2@news.xmission.com>
"Dotan Halevi" <dotREMOVEan.halevTHISi@intANDTHISel.com> writes:
>but on RedHat Linux 9.0 , whence
>$ rpm -q perl
>perl-5.8.0-88
>__________ test #2 over RedHat 9.0, perl 5.8.0-88 __________
>$ perl -e 'print(pack("v", 0xabcd))'| hexdump
>0000000 8dc3 abc2
>0000004
>___________ end ________________________
Here's result from my Slackware 9.1 box:
11 beorn:bgeer% perl -v
This is perl, v5.8.0 built for i486-linux
[perl copyright verbiage deleted]
12 beorn:bgeer% perl -e 'print(pack("v", 0xabcd))' | hexdump
0000000 abcd
0000002
--
<> Robert Geer & Donna Tomky | |||| We sure |||| <>
<> bgeer@xmission.com | == == find it == == <>
<> dtomky@xmission.com | == == enchanting == == <>
<> Albuquerque, NM USA | |||| here! |||| <>
------------------------------
Date: 11 Sep 2004 16:37:12 -0700
From: tigermott@yahoo.com (javatiger)
Subject: use CGI qw(:standard) ???
Message-Id: <962e2a34.0409111537.5ccea4e8@posting.google.com>
This is in one of the scripts I've downloaded is it a lib file or
module or something. I'm not sure if it is already installed on my
server if not where can I get it?
------------------------------
Date: 12 Sep 2004 00:17:02 GMT
From: Eric Bohlman <ebohlman@omsdev.com>
Subject: Re: use CGI qw(:standard) ???
Message-Id: <Xns9561C50B38037ebohlmanomsdevcom@130.133.1.4>
tigermott@yahoo.com (javatiger) wrote in
news:962e2a34.0409111537.5ccea4e8@posting.google.com:
> This is in one of the scripts I've downloaded is it a lib file or
> module or something. I'm not sure if it is already installed on my
> server if not where can I get it?
It's a module which is a standard part of the Perl distribution. If your
server doesn't have it, either it's running a *very* old version of perl or
its administrator isn't competent to properly install the distribution. If
either is the case, you're going to find yourself fighting quite a few
losing battles and would do far better to find another server for your CGI-
related stuff.
------------------------------
Date: Sat, 11 Sep 2004 18:30:23 -0600
From: Scott Bryce <sbryce@scottbryce.com>
Subject: Re: use CGI qw(:standard) ???
Message-Id: <10k764tte6o8f88@corp.supernews.com>
javatiger wrote:
> This is in one of the scripts I've downloaded is it a lib file or
> module or something. I'm not sure if it is already installed on my
> server if not where can I get it?
It is a module. It is probably already installed on your server, but we
have no way of knowing for sure. It is probably safe to assume that the
CGI module is installed, unless this line of the script causes an error.
If the module isn't there, there isn't anything we can do to help you.
You would need to discuss that with your hosting provider.
This is not the place to get help configuring CGI scripts that you have
found on the internet.
------------------------------
Date: Sat, 11 Sep 2004 16:21:48 -0400
From: keith <krw@att.bizzzz>
Subject: Re: Xah Lee's Unixism
Message-Id: <pan.2004.09.11.20.21.45.337894@att.bizzzz>
On Sat, 11 Sep 2004 18:08:57 +0100, Rupert Pigott wrote:
> jmfbahciv@aol.com wrote:
>
>> In article <opsd2vlvy7pqzri1@mjolner.upc.no>,
>> "John Thingstad" <john.thingstad@chello.no> wrote:
>>
>> There has been a request to [spit] these newsgroups. Where
>> do you read from? I'm over in a.f.c.
>>
>>>On Thu, 09 Sep 04 13:12:17 GMT, <jmfbahciv@aol.com> wrote:
>>>
>>>
>>>> I really want to know. People keep saying this but never say which
>>>> freedoms have been lost.
>>>>
>>>
>>>Since this is somewhat related to computer programming
>>>and AI I will reply.
>>
>> Thank you. I appreciate the effort.
>>
>>>
>>>The US has started a initiative to integrate all
>>>information about people in the USA into a central database.
>>
>> This is why I'm puzzled. This stuff is nothing new; about
>> the only difference is the detail.
>>>
>>>This includes confidential information like
>>>your medical files. Think what
>>>you say to your psychologist is confidential?
>>
>> It never was confidential. People talk; doctors confer. It
>> was off limits w.r.t. law enforcement but I think that had
>> more to do with not having to testify against yourself.
>
> The Hippocratic Oath demands that patient confidentiality
> be respected.
The Hippocratic oath is not law. Indeed it's not even required of many
(most?) doctors anymore.
> I'm sure that there is plenty of material out there which explains why
> the Oath exists and why it might be desirable.
It may be desirable, however it's not in the Constitution, nor is it law.
--
Keith
------------------------------
Date: Sat, 11 Sep 2004 16:45:32 -0400
From: keith <krw@att.bizzzz>
Subject: Re: Xah Lee's Unixism
Message-Id: <pan.2004.09.11.20.45.29.756681@att.bizzzz>
On Sat, 11 Sep 2004 16:05:52 +0000, SM Ryan wrote:
> # But France, Germany and Russia would have nothing to do with that.
> # It would stop their cash flows with Saddam if we had tried to build
>
> France said all along it would agree to military action in Iraq
> _if_ NBC weapons or development where discoverrd.
>
> So where are these weapons?
We don't know. We *do* know they had them. We don't know what happened
to them (though some have shown up). Indeed I hope they did disappear
into a black hole somewhere (never to be seen again).
> France and Germany are in Afghanistan fighting and dying on our behalf,
> along with other NATO armies.
Our? Al-Quida is only a US issue? France and Germany have nothing to
fear from terrorism?
> Iraq had nothing to do with terrorism
Bullshit. It may have had nothing to do with 9/11, but only the infirm
would believe Iraq had nothing to do with terrorism.
> except for the echoing looniness inside Dick Cheney's empty skull.
You're projecting again.
> The
> real war on terrorism is in Afghanistan which the USA abandonned in
> search of more profitable plunder.
Oh, please! No one abandoned Afghanistan. Just because it's not first
up on Dan Blather, doesn't mean it fell off teh radar screen.
> France and Germany and other NATO
> armies are fighting the war on terrorism, and they were doing so long
> before the USA got involved. It's the USA that abandonned the war on
> terrorism in favour of trying to break OPEC and control the flow of oil
> from Arab states, not France and Germany.
...any more fairy tales? France and Germany were the ones profiting,
under the table, from trade with Iraq under the Oil-for-Food program.
They didn't want to kill the goose...
> # the cease fire. With nobody watching the bad boy, he could # do
> anything he damned well wanted to, including allow transport # across
> his country from east to west.
>
> The borders of Iraq were far better regulated under Saddam than today.
Is that why there were so many terrorists living in Iraq? I thought
Saddam had nothing to do with terrorism? ...can't have it both ways.
> The chaos that USA inflicted openned the borders.
Perhaps. Iran and Syria do not want Iraq to be free. Much of the funding
for the "insurgents" is from Iran and Syria.
> Remember Bunker Hill? Remember Valley Forge? Remember Yorktown?
How about Antietam, Harpers Ferry, and Gettysburgh? ...or maybe Pearl
Harbor, Coral Sea, Midway, Guada Canal? See I can name irrelevant battles
too.
> Do you think only Americans are capable of taking up arms against a
> foreign occupier and fighting for their independence? We have become the
> redcoats and Hessians. Makes you kinda proud, doesn't it?
The US seems to be the only one with a real military left. The French?
Italy? Canada?
--
Keith
------------------------------
Date: Sat, 11 Sep 2004 14:51:56 -0700
From: "Jack Peacock" <peacock@simconv.com>
Subject: Re: Xah Lee's Unixism
Message-Id: <T_-dnTFYHsng7t7cRVn-qQ@mpowercom.net>
"Chuck Dillon" <spam@nimblegen.com> wrote in message
news:chsbod$q0i$1@grandcanyon.binc.net...
> Your argument is shallow if you direct it to the person who happens to be
> holding the office of President at the moment. The President can't
> introduce or pass law.
>
Laws no, but the definition of a law can be ambiguous. Congress has given
federal agencies under the President broad power to issue regulations with
the same effect as laws, but without going through the legislative process.
Anyone who has ever battled with the Bureau of Land Management or ran afoul
of the Endangered Species Act knows that "laws" are often created by fiat in
a Washington DC office building.
Then there are presidential Executive Orders which are often attempts to end
run around a lack of congressional cooperation. Clinton attempted to use
this to outlaw firearms posession in federal housing until the Supreme Court
put a stop to it.
And finally there are international treaties, which operate with the force
of law but are not passed by the House of Representatives. The President
signs it and the Senate confirms it, but half the legislative process is cut
out. Often all that protects the country from disasters like the Kyoto
Treaty is a filibuster by a Senate minority.
Jack Peacock
------------------------------
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 6994
***************************************
