I believe I have a solution now. I'm going to try switching the way the system works to eval() to a hash reference, instead of a hash. I expect that to silence the two original warnings caused by the undef being returned.
More egg on my face, this didn't change a thing!
I reverted to something like the original snippet and changed the system to produce hash references, instead of hash lists:
my $details = eval $replacements{ACTION_DETAILS};
if ($@) {
# tell me about the error...
}I still get the second set of errors. The errors inside to eval() code.
I'm dumbfounded.
James
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
