* Dave Hodgkinson <[EMAIL PROTECTED]> [2002-07-30 07:27]:
> Dave Hodgkinson <[EMAIL PROTECTED]> writes:
>
> > I get:
> >
> > <form method="post" action="/usr/bin/tpage"
>enctype="application/x-www-form-urlencoded">
> > <input type="checkbox" name="keyword_id" value="11" />settlement
> > <input type="checkbox" name="keyword_id" value="9" />Payments
> > ARRAY(0x83159d0)
>
> At Mark F's request, a look at the compiled template gives:
[-- snip --]
> Is that meaningful?!!
Yep.
I added a warn and commented out the return:
eval { BLOCK: {
# USE
$stash->set('q',
$context->plugin('CGI'));
$stash->set('keyword', { '9' => 'Payments', '11' => 'settlement' });
$output .= $stash->get(['q', 0, 'start_form', 0]);
$output .= $stash->get(['q', 0, 'checkbox_group', [ { 'Name' => 'keyword_id',
'Values' => $stash->get(['keyword', 0, 'keys', 0, 'sort', 0]), 'Default' => ('' .
$stash->get(['params', 0, 'keyword_id', 0])), 'Labels' => $stash->get('keyword') } ],
'join', 0]);
my $end_form = $stash->get(['q', 0, 'end_form', 0]);
warn "\$end_form is '$end_form'\n";
$output .= $end_form;
$output .= " \n";
} };
if ($@) {
$error = $context->catch($@, \$output);
die $error unless $error->type eq 'return';
}
#return $output;
And get:
$end_form is 'ARRAY(0x830dfb4)'
Apparently, $q->end_form is returning a stringified array. Which is to
say, I don't have an answer for you, but the problem scope is
narrower. Next stop: perl -d tpage.
(darren)
--
I was thrown out of college for cheating on the metaphysics exam; I
looked into the soul of the boy sitting next to me.
-- Woody Allen
_______________________________________________
templates mailing list
[EMAIL PROTECTED]
http://www.template-toolkit.org/mailman/listinfo/templates
