David, your revisions made your solution even more clear to me. With
regard to my earlier question of using this in a subroutine, I think I
now see that %thehash would be my persistent repository for methods, and
that I could refer to it just like you did in the last three lines,
without rereading the database.
Thank you, again, for your help.
-Kevin
>>> "David Kirol" <[EMAIL PROTECTED]> 04/16/02 11:29AM >>>
Kevin,
Hope the script I sent earlier helped expose you to some of the hash
and
reference stuff.
I re-read your post and it occured to me you requirement was not that
complex (but, perl is partly about fun...)
Finally, when I've got the hash built, how can I get a particular
method, by specifying it's methodid, or instance?
Thanks for your help and suggestions. Please let me know if I should
take this question to the DBI-users list.
This suggests, IMHO, you need to select a key field from the method
table
and a value field.
If you choose id as the key and method as the value you could
substitute the
code below
into the script I sent earlier, and it should be a bit more on target.
my %thehash;
my @row_ary;
my $row_ary;
my $key;
while (@row_ary = $sth->fetchrow_array) {
$key = $row_ary[0];
$thehash{$key} = $row_ary[1];
}
$sth->finish;
$dbh->disconnect;
# all dbi stuff is done, show the hash
foreach $key (sort keys %thehash) {
print"Key: $key Value: $thehash{$key}\n";
}
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
