call by name

$selN=$selS=$sela=$selb=$selc=$seld=$sele=$selg=$selh=$seli=$selj='';
$sel1=$sel2=$sel3=$sel4=$sel5=$sel6=$schname='';   

當$group和$kind決定了，就可以用

  $a="sel{$group}";
  ${$a}='selected';
  $a="sel{$kind}";
  ${$a}='selected';

這種方式指定，當然也可以用陣列

底下是另外一種方式：
  $active0=$active1='';
  ${"active{$kind}"}="class='active'";