Jeff Pang wrote:
>
>>elsif ($q->param("delete_aoc$number.x")){
>> return "Delete AOC $number";
>>
>> }
>
>
> I'm not so sure,is it right for you?
>
> elsif ($q->param(eval "delete_aoc$number.x")){
eval() runs _Perl_ code. "delete_aoc$number.x" is NOT Perl code so you
shouldn't use eval() on it.
> return "Delete AOC $number";
>
> }
>
> I just tested under my environment,it could work.
John
--
use Perl;
program
fulfillment
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
