While I agree that it would be a good homework assignment it's not.
What I have is a logic look up table for health records using an EAV
model (in an SQL table):
rowID ----- key ----- value
From a web form I select some keys and values. When submitted, I
create a new rowID and put in the keys and values:
a1 k1 v1
a1 k2 value
a1 k3 cheesecake
a1 day Thursday
If a key has multiple values, I need to enter multiple rowIDs:
a2 num 6
a2 k1 v1
a3 num 7
a3 k1 v1
Anyway, then what happens is I take a patient's list of keys/values
and compare it to what's in these logic tables, then get the rowID and
that corresponds to another table that helps me to get analytical text
regarding the various sets of keys and values.
I thought of some rather creative ways to do it using binary values or
SQL table joins, but none of them seemed eloquent and so it bothered me.
I do appreciate the concern about homework though.
On Oct 6, 2008, at 11:02 AM, Randal L. Schwartz wrote:
""Mr" == "Mr Shawn H Corey" <[EMAIL PROTECTED]> writes:
"Mr> On Sun, 2008-10-05 at 21:30 -0700, Randal L. Schwartz wrote:
Eh? My question has *nothing* to do with my solution. My question
has to do with the original question.
"Mr> And my question is why isn't these abilities of glob described in
"Mr> perldoc?
You should treat this "feature" of glob the same way you treat:
my $foo if 0;
and those stupid:
perl -e ' ... }{ ...'
tricks, as in, it works for now, but I wouldn't promise it in the
future.
As in, my answer started with a joke. Hence the smiley. But I did
have a
puzzling question about this recurring need for "all combinations"
and always
stated rather abstractly, without the real-world need backing it up.
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503
777 0095
<[EMAIL PROTECTED]> <URL:http://www.stonehenge.com/merlyn/>
Smalltalk/Perl/Unix consulting, Technical writing, Comedy, etc. etc.
See http://methodsandmessages.vox.com/ for Smalltalk and Seaside
discussion
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
