@edittypes = qw( htm html txt);
$regex = join('|', map{"\\.$_" }@edittypes);

$_ = $q->param('select');
inerror("You can only edit @edittypes") unless /$regex/i;

Using & will disable any proto you've got on a function.

--

Brother Frankus.

¤