>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")){ return "Delete AOC $number"; } I just tested under my environment,it could work. -- Jeff Pang NetEase AntiSpam Team http://corp.netease.com -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>